(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 12.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       158,          7]
NotebookDataLength[    149590,       3005]
NotebookOptionsPosition[    139398,       2794]
NotebookOutlinePosition[    140619,       2828]
CellTagsIndexPosition[    140538,       2823]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{
Cell[TextData[{
 "New in: ",
 Cell["12", "HistoryData",
  CellTags->"New",ExpressionUUID->"2f84e1ae-a747-4826-851f-0103411210fe"],
 " | Modified in: ",
 Cell[" ", "HistoryData",
  CellTags->"Modified",ExpressionUUID->"4dab500c-5494-49c8-96c4-2f279a973c66"],
 " | Obsolete in: ",
 Cell[" ", "HistoryData",
  CellTags->"Obsolete",ExpressionUUID->"4f2ea85d-21e0-4ad2-bbc8-18a828e25371"],
 " | Excised in: ",
 Cell[" ", "HistoryData",
  CellTags->"Excised",ExpressionUUID->"960e6121-32da-4c2b-8903-3f9c288b942f"]
}], "History",
 CellID->341476719,ExpressionUUID->"23d88528-ac76-4f58-ab80-8ba08dc66fbf"],

Cell["Created by: arnoudb on 04-02-2019 17:05:37", "AuthorDate",
 CellID->712066545,ExpressionUUID->"d4f2b35f-359b-45be-85a8-61932ee8a94b"],

Cell[CellGroupData[{

Cell["Categorization", "CategorizationSection",
 CellID->1122911449,ExpressionUUID->"aab346e5-c54e-4543-bfb6-055de9d33d30"],

Cell["Symbol", "Categorization",
 CellLabel->"Entity Type",
 CellID->686433507,ExpressionUUID->"628529aa-75c0-47b0-aee1-60c78cad327e"],

Cell["", "Categorization",
 CellLabel->"Paclet Name",
 CellID->605800465,ExpressionUUID->"bef83001-b92a-4b47-91bf-718662946187"],

Cell["", "Categorization",
 CellLabel->"Context",
 CellID->468444828,ExpressionUUID->"bea189f9-73e0-4baf-b29f-7184e0cf366c"],

Cell["XXXX", "Categorization",
 CellLabel->"URI",ExpressionUUID->"e6d405af-40e0-4ab3-b0f9-eef9bc6a46a8"],

Cell["XXXX", "Categorization",
 CellLabel->"Title Modifier",
 CellID->172747495,ExpressionUUID->"4a2472d2-19f5-4b9f-a0f2-c5a1708cd7bb"]
}, Closed]],

Cell[CellGroupData[{

Cell["Synonyms", "SynonymsSection",
 CellID->1427418553,ExpressionUUID->"fb8acf4f-9285-4b8c-a747-4381fc0b9d41"],

Cell["XXXX", "Synonyms",
 CellID->1251652828,ExpressionUUID->"80d54c53-ee23-43f2-a45f-b1e852e781b1"]
}, Closed]],

Cell[CellGroupData[{

Cell["Keywords", "KeywordsSection",
 CellID->477174294,ExpressionUUID->"e9878159-9f99-4959-9826-e5a3f952bf23"],

Cell["XXXX", "Keywords",
 CellID->1164421360,ExpressionUUID->"612ce670-b22f-493d-b218-797337b1a463"]
}, Closed]],

Cell[CellGroupData[{

Cell["Syntax Templates", "TemplatesSection",
 CellID->1872225408,ExpressionUUID->"5cc15371-6f63-4f57-9207-32b25cb98ecc"],

Cell[BoxData[""], "Template",
 CellLabel->"Additional Function Template",
 CellID->1562036412,ExpressionUUID->"895d1c65-38f1-4125-baff-a225fcfc19c8"],

Cell[BoxData[""], "Template",
 CellLabel->"Arguments Pattern",
 CellID->158391909,ExpressionUUID->"170b786f-fb75-4556-a26a-6701da067cc2"],

Cell[BoxData[""], "Template",
 CellLabel->"Local Variables",
 CellID->1360575930,ExpressionUUID->"82a33b27-a8e0-4f8a-ba2a-5f2dee7b1bbf"],

Cell[BoxData[""], "Template",
 CellLabel->"Color Equal Signs",
 CellID->793782254,ExpressionUUID->"a0124f6d-7659-412c-a856-eefb69ed49a8"]
}, Closed]],

Cell[CellGroupData[{

Cell["Details", "DetailsSection",
 CellID->307771771,ExpressionUUID->"8f9f96de-cdd4-415b-98c3-6a4a1d7a219e"],

Cell["XXXX", "Details",
 CellLabel->"Lead",
 CellID->49458704,ExpressionUUID->"4b2f2a6b-f93c-4868-9e10-5b6968909260"],

Cell["XXXX", "Details",
 CellLabel->"Developers",
 CellID->350963985,ExpressionUUID->"6e4a3ae1-cdf6-47cc-ad1f-759e8fe45593"],

Cell["XXXX", "Details",
 CellLabel->"Authors",
 CellID->422270209,ExpressionUUID->"efc33df5-b775-495a-80e4-3521a78bc446"],

Cell["XXXX", "Details",
 CellLabel->"Feature Name",
 CellID->545239557,ExpressionUUID->"1a0db4eb-149a-46f3-b25b-b280d6264af5"],

Cell["XXXX", "Details",
 CellLabel->"QA",
 CellID->121292707,ExpressionUUID->"1050f771-3937-45cd-bf2a-bca989fc6c2c"],

Cell["XXXX", "Details",
 CellLabel->"DA",
 CellID->29314406,ExpressionUUID->"2d37259b-d19a-4265-94d9-1062a057d814"],

Cell["XXXX", "Details",
 CellLabel->"Docs",
 CellID->96001539,ExpressionUUID->"4e0c64af-4701-4221-b6a7-d115b2825a25"],

Cell["XXXX", "Details",
 CellLabel->"Features Page Notes",
 CellID->123278822,ExpressionUUID->"d0039a91-8ee2-4052-8ab0-325c85db884a"],

Cell["XXXX", "Details",
 CellLabel->"Comments",
 CellID->240026365,ExpressionUUID->"02ff136a-5412-4c7d-9f54-fb44ec7c41f5"]
}, Closed]],

Cell[CellGroupData[{

Cell["Security Details", "SecuritySection",
 CellID->13551076,ExpressionUUID->"c4d92900-bc11-4614-8c83-407abdd45933"],

Cell[BoxData[
 TagBox[GridBox[{
    {
     TemplateBox[{CheckboxBox[
        Dynamic[
         CurrentValue[
          EvaluationNotebook[], {TaggingRules, "SecurityRisk"}, False]]],
       StyleBox[
       "\"   Potential security risk\"", FontFamily -> "Arial", FontSize -> 
        10, StripOnInput -> False]},
      "RowDefault"]},
    {
     DynamicBox[ToBoxes[
       If[
        TrueQ[
         CurrentValue[
          EvaluationNotebook[], {TaggingRules, "SecurityRisk"}]], 
        InputField[
         Dynamic[
          CurrentValue[
           EvaluationNotebook[], {TaggingRules, "SecurityExplanation"}, ""]], 
         String, FieldHint -> "How so? (optional)", FieldSize -> {40, 5}, 
         BaseStyle -> {FontFamily -> "Arial", FontSize -> 12}], ""], 
       StandardForm],
      ImageSizeCache->{0., {0., 5.}}]}
   },
   DefaultBaseStyle->"Column",
   GridBoxAlignment->{"Columns" -> {{Left}}},
   GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
  "Column"]], "SecurityDetails",
 CellID->2488900,ExpressionUUID->"89fc8445-1353-4fa3-97dd-1be0f00a5de5"]
}, Closed]],

Cell[CellGroupData[{

Cell["$LocalResourceObjects", "ObjectName",
 CellChangeTimes->{{3.7632315612111387`*^9, 3.7632315658583126`*^9}},
 CellID->1224892054,ExpressionUUID->"9e65fd4a-3b79-48c0-af70-75bef669e834"],

Cell[TextData[{
 Cell["   ", "ModInfo",ExpressionUUID->"2fdc3ed2-06fd-4227-b5c0-2a023c6c9737"],
 Cell[BoxData[
 "$LocalResourceObjects"], "InlineFormula",ExpressionUUID->
  "f8ea538b-9d46-4953-98dc-da0c15517a97"],
 " \[LineSeparator]gives the resource objects that are stored locally on the \
machine."
}], "Usage",
 CellChangeTimes->{{3.7632315735805044`*^9, 3.7632316023148336`*^9}},
 CellID->982511436,ExpressionUUID->"2f7b7357-db0a-477c-a3fa-e2cca7faa2b5"],

Cell["XXXX", "Notes",
 CellID->1067943069,ExpressionUUID->"c396774d-bb61-4976-8af9-595edbd6f735"]
}, Open  ]],

Cell[CellGroupData[{

Cell["Tutorials", "TutorialsSection",
 CellID->250839057,ExpressionUUID->"b02d4013-fc03-46fd-91f5-418756d88d93"],

Cell["XXXX", "Tutorials",
 CellID->341631938,ExpressionUUID->"e5fbfac5-d780-4a61-9aa1-c2995b34e594"]
}, Open  ]],

Cell[CellGroupData[{

Cell["Related Demonstrations", "RelatedDemonstrationsSection",
 CellID->1268215905,ExpressionUUID->"2bafa20c-ad4d-4358-9b58-1c0fa094f645"],

Cell["XXXX", "RelatedDemonstrations",
 CellID->1129518860,ExpressionUUID->"ca787c01-e02b-4f0c-b52a-b5a25070bba2"]
}, Open  ]],

Cell[CellGroupData[{

Cell["Related Links", "RelatedLinksSection",
 CellID->1584193535,ExpressionUUID->"a98c198c-eaff-4f47-a52b-bde15cb67cfa"],

Cell["XXXX", "RelatedLinks",
 CellID->1038487239,ExpressionUUID->"ec84bd42-24ea-4c7d-a2df-bf8e73ab079b"]
}, Open  ]],

Cell[CellGroupData[{

Cell["See Also", "SeeAlsoSection",
 CellID->1255426704,ExpressionUUID->"d9364631-c239-4d65-b012-ba498b2ced33"],

Cell["XXXX", "SeeAlso",
 CellID->929782353,ExpressionUUID->"77ab00c7-f97f-445a-9882-c5a9482ccd27"]
}, Open  ]],

Cell[CellGroupData[{

Cell["Related Workflows", "RelatedWorkflowsSection",
 CellID->121236710,ExpressionUUID->"fc08db45-053b-4d9f-98c1-1ff4c0f2aaf6"],

Cell["XXXX", "RelatedWorkflows",
 CellID->294347949,ExpressionUUID->"0387d739-2698-4d59-91f8-023405a5f852"]
}, Open  ]],

Cell[CellGroupData[{

Cell["More About", "MoreAboutSection",
 CellID->38303248,ExpressionUUID->"b2f57e8f-69ad-4769-b4dc-58a90c351f38"],

Cell["Autogenerated", "MoreAbout",
 CellID->1665078683,ExpressionUUID->"0862ec19-c5ba-4499-bc8f-b5b8b510794c"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 InterpretationBox[GridBox[{
    {
     StyleBox["Examples", "PrimaryExamplesSection"], 
     ButtonBox[
      RowBox[{
       RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
      BaseStyle->"ExtendedExamplesLink",
      ButtonData:>"ExtendedExamples"]}
   }],
  $Line = 0; Null]], "PrimaryExamplesSection",
 CellID->880084151,ExpressionUUID->"ff765981-7828-4382-a532-4eb8c1f0790e"],

Cell["List the locally stored resource objects:", "ExampleText",
 CellChangeTimes->{{3.7632316570524135`*^9, 3.7632316691399145`*^9}},
 CellID->27136305,ExpressionUUID->"9f18615e-568f-4491-8475-69e25b16dee5"],

Cell[CellGroupData[{

Cell[BoxData["$LocalResourceObjects"], "Input",
 CellChangeTimes->{{3.763231606174889*^9, 3.76323164487507*^9}},
 CellLabel->"In[20]:=",
 CellID->774120792,ExpressionUUID->"48d120a9-8c4a-481d-b3f1-a5417e7d8153"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   InterpretationBox[
    RowBox[{
     TagBox["ResourceObject",
      "SummaryHead"], "[", 
     DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = 
      "Ready"}, 
      TemplateBox[{
        PaneSelectorBox[{False -> GridBox[{{
              PaneBox[
               ButtonBox[
                DynamicBox[
                 FEPrivate`FrontEndResource["FEBitmaps", "SummaryBoxOpener"]],
                 ButtonFunction :> (Typeset`open$$ = True), Appearance -> 
                None, BaseStyle -> {}, Evaluator -> Automatic, Method -> 
                "Preemptive"], Alignment -> {Center, Center}, ImageSize -> 
               Dynamic[{
                 Automatic, 
                  3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                   Magnification])}]], 
              StyleBox[
               GraphicsBox[{
                 RGBColor[0.37647, 0.56863, 0.16078], 
                 DiskBox[{33, 35}, 43], 
                 GrayLevel[1], 
                 Thickness[0.02055], 
                 CapForm["Butt"], 
                 JoinForm[{"Miter", 10.}], 
                 StyleBox[
                  
                  JoinedCurveBox[{{{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 
                   2, 0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 
                   0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{
                   0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 
                   0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 
                   0}}}, CompressedData["
1:eJxTTMoPSmVmYGAQAWImKOaae/2GapuTQ6yY8Oz+1zIOJVtFf5/m83ewnP5o
1ab1lnC+V9zcZAchNweY+h8FJwuX+/jD+YTUw/i45NH1w/i43IfLPbj0o9sP
k5durIjdzyDrsPnSEpGS9V4Y5sHkH72cuomn1BHDPJh8xrrLHt6lBhj+waUe
3T5C7oH5H10el/vQ3Y/uPkL+I+R+mHm49KO7F91+mDwA6/QRHQ==
                   "], 
                   CurveClosed -> {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
                    0, 0, 0, 0, 0, 0}], {
                   RGBColor[0.8441175, 0.8921574999999999, 0.790195]}, 
                  StripOnInput -> False], 
                 FaceForm[
                  GrayLevel[1]], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}, {1, 3, 3}}}, CompressedData["
1:eJxTTMoPSmVmYGBgAWIBIGYCYn85sSzf4y4OLM97NN5u9XeA8U91lokG5fk5
8PZNCn9+xNlhw7/ziftSfB2CPOc2qLU5OfRqvOUF8e9tyA1Mc3eE80NKVKb/
d3FwWL558sFAoH4Y/4HAqitvgObD+PKLLsoeqQtw8I94xJgK1L/6+ZLvvcyB
Dlxzr99QBZp/fm+7dx+Q77G/VtZC3hnOV/9uLcK6ydkhXWfWOb8nAQ4Kye+i
nORcHAqjPixavybA4aLS7Z91XS4O1R1u5QKlAXD/+L9M+DtfE8GH+Rfmn3+1
x1qZYz0cprGsWAlyD4wPcy/HSSa1gmB3OL99v1r2FW43OF+rR5fF8ogLXL8g
Y3vA0l3OcPNhfFh4wvgw98D0w/gw82F8pdXRtuor3Ry6gNEC8l/lSzVDDgd3
hxvbNDY7Av2f2lvV4bbeHR4+utGvu1vkPODht/0iwz0moH9g4Qvjw9zXFJZw
4lWcHdz9MD7Mf/4OwomHvW3g/Ck3FSb37LGE828V6R0N1TWH618e8zBWT8oU
bj6MD/M/jA/zH0w/jA8zH8ZvZDnab/jdCu7/cl1F+S8qNnD/g+OH2Rbuf3B6
e2gL9/+Xv1cqXgL9A/M/jA9zH39SOtdcdg24+2F8mP9WmJ619nuoDOdnXLhg
f7BVFs6vM2XneOYhDNefvHPp1Qk/WOHmw/gw/8P4MP/B9MP4MPNhfL59BjO1
LBTh6Tt7e2zGusnK8PQv7b7m6PIAVbj/T1/7pbSQVx3uf5h/YP6H8QG+spg4

                  "]], 
                 FaceForm[
                  GrayLevel[1]], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}}}, {{{67.47446, 45.0654}, {67.47446, 42.50597}, {
                   65.45572, 40.43115}, {62.96546, 40.43115}, {60.4752, 
                   40.43115}, {58.45645, 42.50597}, {58.45645, 45.0654}, {
                   58.45645, 47.62484}, {60.4752, 49.69965}, {62.96546, 
                   49.69965}, {65.45572, 49.69965}, {67.47446, 47.62484}, {
                   67.47446, 45.0654}}, {{62.96546, 29.39777}, {60.4752, 
                   29.39777}, {58.45645, 27.32295}, {58.45645, 24.76352}, {
                   58.45645, 22.20409}, {60.4752, 20.12927}, {62.96546, 
                   20.12927}, {65.45572, 20.12927}, {67.47446, 22.20409}, {
                   67.47446, 24.76352}, {67.47446, 25.9926}, {66.99939, 
                   27.17135}, {66.15379, 28.04043}, {65.30819, 28.90952}, {
                   64.1613, 29.39775}, {62.96544, 29.39775}}}], 
                 FaceForm[
                  GrayLevel[1]], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}}}, {{{10.90992, 54.24335}, {10.90992, 51.68393}, {
                   8.89117, 49.6091}, {6.40092, 49.6091}, {3.91067, 
                   49.6091}, {1.89192, 51.68392}, {1.89191, 54.24334}, {
                   1.8919, 56.80276}, {3.91064, 58.87759}, {6.40089, 
                   58.87761}, {7.59676, 58.87761}, {8.74365, 58.38936}, {
                   9.58925, 57.52027}, {10.43486, 56.65118}, {10.90992, 
                   55.47244}, {10.90992, 54.24335}}, {{6.40089, 39.5487}, {
                   3.91064, 39.54868}, {1.8919, 37.47387}, {1.89191, 
                   34.91443}, {1.89192, 32.35502}, {3.91067, 30.2802}, {
                   6.40092, 30.2802}, {8.89117, 30.2802}, {10.90992, 
                   32.35502}, {10.90992, 34.91445}, {10.90992, 36.14354}, {
                   10.43486, 37.32228}, {9.58925, 38.19137}, {8.74365, 
                   39.06045}, {7.59676, 39.5487}, {6.40089, 39.5487}}, {{
                   6.40089, 20.2198}, {3.91064, 20.2198}, {1.89189, 
                   18.14498}, {1.89189, 15.58555}, {1.89189, 13.02612}, {
                   3.91064, 10.9513}, {6.40089, 10.9513}, {8.89115, 
                   10.9513}, {10.9099, 13.02612}, {10.9099, 15.58555}, {
                   10.9099, 18.14498}, {8.89115, 20.2198}, {6.40089, 
                   20.2198}}}]}, {
                AspectRatio -> 1, Axes -> False, Background -> None, Frame -> 
                 None, FrameTicks -> None, ImageSize -> {Automatic, 
                   Dynamic[
                   3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                    Magnification])]}, AspectRatio -> 1, Axes -> False, 
                 Background -> None, Frame -> None, FrameTicks -> None, 
                 ImageSize -> {Automatic, 30}}], CacheGraphics -> False, 
               StripOnInput -> False], 
              GridBox[{{
                 RowBox[{
                   TagBox["\"Name: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    
                    TemplateBox[{
                    "\"Wolfram ImageIdentify Net V1\"", "\" \"", 
                    
                    TemplateBox[{
                    "\"\[RightGuillemet]\"", 
                    
                    "https://resources.wolframcloud.com/NeuralNetRepository/\
resources/Wolfram-ImageIdentify-Net-V1"}, "HyperlinkURL"]}, "RowDefault"], 
                    "SummaryItem"]}], 
                 TagBox["\"\"", "SummaryItem"]}, {
                 RowBox[{
                   TagBox["\"Type: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["\"NeuralNet\"", "SummaryItem"]}], 
                 "\[SpanFromLeft]"}, {
                 RowBox[{
                   TagBox["\"Description: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                   "\"Identify the main object in an image\"", 
                    "SummaryItem"]}], "\[SpanFromLeft]"}}, 
               GridBoxAlignment -> {
                "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> 
               False, GridBoxItemSize -> {
                "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
               GridBoxSpacings -> {
                "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, 
               BaseStyle -> {
                ShowStringCharacters -> False, NumberMarks -> False, 
                 PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, 
            GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, 
            AutoDelete -> False, 
            GridBoxItemSize -> {
             "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
            BaselinePosition -> {1, 1}], True -> GridBox[{{
              PaneBox[
               ButtonBox[
                DynamicBox[
                 FEPrivate`FrontEndResource["FEBitmaps", "SummaryBoxCloser"]],
                 ButtonFunction :> (Typeset`open$$ = False), Appearance -> 
                None, BaseStyle -> {}, Evaluator -> Automatic, Method -> 
                "Preemptive"], Alignment -> {Center, Center}, ImageSize -> 
               Dynamic[{
                 Automatic, 
                  3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                   Magnification])}]], 
              StyleBox[
               GraphicsBox[{
                 RGBColor[0.37647, 0.56863, 0.16078], 
                 DiskBox[{33, 35}, 43], 
                 GrayLevel[1], 
                 Thickness[0.02055], 
                 CapForm["Butt"], 
                 JoinForm[{"Miter", 10.}], 
                 StyleBox[
                  
                  JoinedCurveBox[{{{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 
                   2, 0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 
                   0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{
                   0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 
                   0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 
                   0}}}, CompressedData["
1:eJxTTMoPSmVmYGAQAWImKOaae/2GapuTQ6yY8Oz+1zIOJVtFf5/m83ewnP5o
1ab1lnC+V9zcZAchNweY+h8FJwuX+/jD+YTUw/i45NH1w/i43IfLPbj0o9sP
k5durIjdzyDrsPnSEpGS9V4Y5sHkH72cuomn1BHDPJh8xrrLHt6lBhj+waUe
3T5C7oH5H10el/vQ3Y/uPkL+I+R+mHm49KO7F91+mDwA6/QRHQ==
                   "], 
                   CurveClosed -> {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
                    0, 0, 0, 0, 0, 0}], {
                   RGBColor[0.8441175, 0.8921574999999999, 0.790195]}, 
                  StripOnInput -> False], 
                 FaceForm[
                  GrayLevel[1]], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}, {1, 3, 3}}}, CompressedData["
1:eJxTTMoPSmVmYGBgAWIBIGYCYn85sSzf4y4OLM97NN5u9XeA8U91lokG5fk5
8PZNCn9+xNlhw7/ziftSfB2CPOc2qLU5OfRqvOUF8e9tyA1Mc3eE80NKVKb/
d3FwWL558sFAoH4Y/4HAqitvgObD+PKLLsoeqQtw8I94xJgK1L/6+ZLvvcyB
Dlxzr99QBZp/fm+7dx+Q77G/VtZC3hnOV/9uLcK6ydkhXWfWOb8nAQ4Kye+i
nORcHAqjPixavybA4aLS7Z91XS4O1R1u5QKlAXD/+L9M+DtfE8GH+Rfmn3+1
x1qZYz0cprGsWAlyD4wPcy/HSSa1gmB3OL99v1r2FW43OF+rR5fF8ogLXL8g
Y3vA0l3OcPNhfFh4wvgw98D0w/gw82F8pdXRtuor3Ry6gNEC8l/lSzVDDgd3
hxvbNDY7Av2f2lvV4bbeHR4+utGvu1vkPODht/0iwz0moH9g4Qvjw9zXFJZw
4lWcHdz9MD7Mf/4OwomHvW3g/Ck3FSb37LGE828V6R0N1TWH618e8zBWT8oU
bj6MD/M/jA/zH0w/jA8zH8ZvZDnab/jdCu7/cl1F+S8qNnD/g+OH2Rbuf3B6
e2gL9/+Xv1cqXgL9A/M/jA9zH39SOtdcdg24+2F8mP9WmJ619nuoDOdnXLhg
f7BVFs6vM2XneOYhDNefvHPp1Qk/WOHmw/gw/8P4MP/B9MP4MPNhfL59BjO1
LBTh6Tt7e2zGusnK8PQv7b7m6PIAVbj/T1/7pbSQVx3uf5h/YP6H8QG+spg4

                  "]], 
                 FaceForm[
                  GrayLevel[1]], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}}}, {{{67.47446, 45.0654}, {67.47446, 42.50597}, {
                   65.45572, 40.43115}, {62.96546, 40.43115}, {60.4752, 
                   40.43115}, {58.45645, 42.50597}, {58.45645, 45.0654}, {
                   58.45645, 47.62484}, {60.4752, 49.69965}, {62.96546, 
                   49.69965}, {65.45572, 49.69965}, {67.47446, 47.62484}, {
                   67.47446, 45.0654}}, {{62.96546, 29.39777}, {60.4752, 
                   29.39777}, {58.45645, 27.32295}, {58.45645, 24.76352}, {
                   58.45645, 22.20409}, {60.4752, 20.12927}, {62.96546, 
                   20.12927}, {65.45572, 20.12927}, {67.47446, 22.20409}, {
                   67.47446, 24.76352}, {67.47446, 25.9926}, {66.99939, 
                   27.17135}, {66.15379, 28.04043}, {65.30819, 28.90952}, {
                   64.1613, 29.39775}, {62.96544, 29.39775}}}], 
                 FaceForm[
                  GrayLevel[1]], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}}}, {{{10.90992, 54.24335}, {10.90992, 51.68393}, {
                   8.89117, 49.6091}, {6.40092, 49.6091}, {3.91067, 
                   49.6091}, {1.89192, 51.68392}, {1.89191, 54.24334}, {
                   1.8919, 56.80276}, {3.91064, 58.87759}, {6.40089, 
                   58.87761}, {7.59676, 58.87761}, {8.74365, 58.38936}, {
                   9.58925, 57.52027}, {10.43486, 56.65118}, {10.90992, 
                   55.47244}, {10.90992, 54.24335}}, {{6.40089, 39.5487}, {
                   3.91064, 39.54868}, {1.8919, 37.47387}, {1.89191, 
                   34.91443}, {1.89192, 32.35502}, {3.91067, 30.2802}, {
                   6.40092, 30.2802}, {8.89117, 30.2802}, {10.90992, 
                   32.35502}, {10.90992, 34.91445}, {10.90992, 36.14354}, {
                   10.43486, 37.32228}, {9.58925, 38.19137}, {8.74365, 
                   39.06045}, {7.59676, 39.5487}, {6.40089, 39.5487}}, {{
                   6.40089, 20.2198}, {3.91064, 20.2198}, {1.89189, 
                   18.14498}, {1.89189, 15.58555}, {1.89189, 13.02612}, {
                   3.91064, 10.9513}, {6.40089, 10.9513}, {8.89115, 
                   10.9513}, {10.9099, 13.02612}, {10.9099, 15.58555}, {
                   10.9099, 18.14498}, {8.89115, 20.2198}, {6.40089, 
                   20.2198}}}]}, {
                AspectRatio -> 1, Axes -> False, Background -> None, Frame -> 
                 None, FrameTicks -> None, ImageSize -> {Automatic, 
                   Dynamic[
                   3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                    Magnification])]}, AspectRatio -> 1, Axes -> False, 
                 Background -> None, Frame -> None, FrameTicks -> None, 
                 ImageSize -> {Automatic, 30}}], CacheGraphics -> False, 
               StripOnInput -> False], 
              GridBox[{{
                 RowBox[{
                   TagBox["\"Name: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    
                    TemplateBox[{
                    "\"Wolfram ImageIdentify Net V1\"", "\" \"", 
                    
                    TemplateBox[{
                    "\"\[RightGuillemet]\"", 
                    "https://resources.wolframcloud.com/NeuralNetRepository/\
resources/Wolfram-ImageIdentify-Net-V1"}, "HyperlinkURL"]}, "RowDefault"], 
                    "SummaryItem"]}], 
                 TagBox["\"\"", "SummaryItem"]}, {
                 RowBox[{
                   TagBox["\"Type: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["\"NeuralNet\"", "SummaryItem"]}], 
                 "\[SpanFromLeft]"}, {
                 RowBox[{
                   TagBox["\"Description: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                   "\"Identify the main object in an image\"", 
                    "SummaryItem"]}], "\[SpanFromLeft]"}, {
                 RowBox[{
                   TagBox["\"ByteCount: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["65353381", "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox[
                   "\"TrainingSetInformation: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                   "\"Internal Wolfram ImageIdentify training set, consisting \
of over 3 million training images and over 4,000 classes of objects (not \
publicly available).\"", "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox["\"InputDomains: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    TagBox[
                    
                    TemplateBox[{",", "\",\"", "\"Image\""}, 
                    "RowWithSeparators"], Short], "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox["\"TaskType: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    RowBox[{"{", "\"Classification\"", "}"}], 
                    "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox["\"Keywords: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    TagBox[
                    
                    TemplateBox[{
                    ",", "\",\"", "\"ImageIdentify\"", 
                    "\"object classification\""}, "RowWithSeparators"], 
                    Short], "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox["\"Data Location: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    
                    DynamicModuleBox[{
                    ResourceSystemClient`Private`typesetstorage$$ = 
                    ResourceSystemClient`Private`typesetstorageLocation, 
                    ResourceSystemClient`Private`info$$}, 
                    DynamicBox[
                    ToBoxes[
                    ResourceSystemClient`Private`info$$ = 
                    ResourceSystemClient`Private`resourceInfo[
                    "044dd5d5-5895-4252-889f-f67729b1a6d3"]; If[
                    AssociationQ[ResourceSystemClient`Private`info$$], 
                    ResourceSystemClient`Private`typesetstorage$$[
                    Lookup[
                    ResourceSystemClient`Private`info$$, 
                    "ContentElementLocations", None]], 
                    Missing["NotAvailable"]], StandardForm]], 
                    DynamicModuleValues :> {}], "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox["\"UUID: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                   "\"044dd5d5-5895-4252-889f-f67729b1a6d3\"", 
                    "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox["\"Version: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["\"1.10.0\"", "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox["\"Elements: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    TagBox[
                    
                    RowBox[{
                    "\"ConstructionNotebook\"", ",", "\"EvaluationNet\"", ",", 
                    RowBox[{"\"Uninit\"", "\[Ellipsis]", "\"ionNet\""}], ",", 
                    "\"ConstructionNotebookExpression\"", ",", 
                    "\"EvaluationExample\""}], Short[#, 2]& ], 
                    "SummaryItem"]}], ""}}, 
               GridBoxAlignment -> {
                "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> 
               False, GridBoxItemSize -> {
                "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
               GridBoxSpacings -> {
                "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, 
               BaseStyle -> {
                ShowStringCharacters -> False, NumberMarks -> False, 
                 PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, 
            GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, 
            AutoDelete -> False, 
            GridBoxItemSize -> {
             "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
            BaselinePosition -> {1, 1}]}, 
         Dynamic[Typeset`open$$], ImageSize -> Automatic]},
       "SummaryPanel"],
      DynamicModuleValues:>{}], "]"}],
    ResourceObject[
     Association[
     "Name" -> "Wolfram ImageIdentify Net V1", "UUID" -> 
      "044dd5d5-5895-4252-889f-f67729b1a6d3", "ResourceType" -> "NeuralNet", 
      "Version" -> "1.10.0", "Description" -> 
      "Identify the main object in an image", "RepositoryLocation" -> 
      URL["https://www.wolframcloud.com/obj/resourcesystem/api/1.0"], 
      "WolframLanguageVersionRequired" -> "11.1", 
      "ContentElements" -> {
       "ConstructionNotebook", "EvaluationNet", "UninitializedEvaluationNet", 
        "ConstructionNotebookExpression", "EvaluationExample"}]],
    Editable->False,
    SelectWithContents->True,
    Selectable->False], ",", 
   InterpretationBox[
    RowBox[{
     TagBox["ResourceObject",
      "SummaryHead"], "[", 
     DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = 
      "Ready"}, 
      TemplateBox[{
        PaneSelectorBox[{False -> GridBox[{{
              PaneBox[
               ButtonBox[
                DynamicBox[
                 FEPrivate`FrontEndResource["FEBitmaps", "SummaryBoxOpener"]],
                 ButtonFunction :> (Typeset`open$$ = True), Appearance -> 
                None, BaseStyle -> {}, Evaluator -> Automatic, Method -> 
                "Preemptive"], Alignment -> {Center, Center}, ImageSize -> 
               Dynamic[{
                 Automatic, 
                  3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                   Magnification])}]], 
              StyleBox[
               GraphicsBox[{
                 RGBColor[0.37647, 0.56863, 0.16078], 
                 DiskBox[{33, 35}, 43], 
                 GrayLevel[1], 
                 Thickness[0.02055], 
                 CapForm["Butt"], 
                 JoinForm[{"Miter", 10.}], 
                 StyleBox[
                  
                  JoinedCurveBox[{{{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 
                   2, 0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 
                   0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{
                   0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 
                   0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 
                   0}}}, CompressedData["
1:eJxTTMoPSmVmYGAQAWImKOaae/2GapuTQ6yY8Oz+1zIOJVtFf5/m83ewnP5o
1ab1lnC+V9zcZAchNweY+h8FJwuX+/jD+YTUw/i45NH1w/i43IfLPbj0o9sP
k5durIjdzyDrsPnSEpGS9V4Y5sHkH72cuomn1BHDPJh8xrrLHt6lBhj+waUe
3T5C7oH5H10el/vQ3Y/uPkL+I+R+mHm49KO7F91+mDwA6/QRHQ==
                   "], 
                   CurveClosed -> {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
                    0, 0, 0, 0, 0, 0}], {
                   RGBColor[0.8441175, 0.8921574999999999, 0.790195]}, 
                  StripOnInput -> False], 
                 FaceForm[
                  GrayLevel[1]], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}, {1, 3, 3}}}, CompressedData["
1:eJxTTMoPSmVmYGBgAWIBIGYCYn85sSzf4y4OLM97NN5u9XeA8U91lokG5fk5
8PZNCn9+xNlhw7/ziftSfB2CPOc2qLU5OfRqvOUF8e9tyA1Mc3eE80NKVKb/
d3FwWL558sFAoH4Y/4HAqitvgObD+PKLLsoeqQtw8I94xJgK1L/6+ZLvvcyB
Dlxzr99QBZp/fm+7dx+Q77G/VtZC3hnOV/9uLcK6ydkhXWfWOb8nAQ4Kye+i
nORcHAqjPixavybA4aLS7Z91XS4O1R1u5QKlAXD/+L9M+DtfE8GH+Rfmn3+1
x1qZYz0cprGsWAlyD4wPcy/HSSa1gmB3OL99v1r2FW43OF+rR5fF8ogLXL8g
Y3vA0l3OcPNhfFh4wvgw98D0w/gw82F8pdXRtuor3Ry6gNEC8l/lSzVDDgd3
hxvbNDY7Av2f2lvV4bbeHR4+utGvu1vkPODht/0iwz0moH9g4Qvjw9zXFJZw
4lWcHdz9MD7Mf/4OwomHvW3g/Ck3FSb37LGE828V6R0N1TWH618e8zBWT8oU
bj6MD/M/jA/zH0w/jA8zH8ZvZDnab/jdCu7/cl1F+S8qNnD/g+OH2Rbuf3B6
e2gL9/+Xv1cqXgL9A/M/jA9zH39SOtdcdg24+2F8mP9WmJ619nuoDOdnXLhg
f7BVFs6vM2XneOYhDNefvHPp1Qk/WOHmw/gw/8P4MP/B9MP4MPNhfL59BjO1
LBTh6Tt7e2zGusnK8PQv7b7m6PIAVbj/T1/7pbSQVx3uf5h/YP6H8QG+spg4

                  "]], 
                 FaceForm[
                  GrayLevel[1]], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}}}, {{{67.47446, 45.0654}, {67.47446, 42.50597}, {
                   65.45572, 40.43115}, {62.96546, 40.43115}, {60.4752, 
                   40.43115}, {58.45645, 42.50597}, {58.45645, 45.0654}, {
                   58.45645, 47.62484}, {60.4752, 49.69965}, {62.96546, 
                   49.69965}, {65.45572, 49.69965}, {67.47446, 47.62484}, {
                   67.47446, 45.0654}}, {{62.96546, 29.39777}, {60.4752, 
                   29.39777}, {58.45645, 27.32295}, {58.45645, 24.76352}, {
                   58.45645, 22.20409}, {60.4752, 20.12927}, {62.96546, 
                   20.12927}, {65.45572, 20.12927}, {67.47446, 22.20409}, {
                   67.47446, 24.76352}, {67.47446, 25.9926}, {66.99939, 
                   27.17135}, {66.15379, 28.04043}, {65.30819, 28.90952}, {
                   64.1613, 29.39775}, {62.96544, 29.39775}}}], 
                 FaceForm[
                  GrayLevel[1]], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}}}, {{{10.90992, 54.24335}, {10.90992, 51.68393}, {
                   8.89117, 49.6091}, {6.40092, 49.6091}, {3.91067, 
                   49.6091}, {1.89192, 51.68392}, {1.89191, 54.24334}, {
                   1.8919, 56.80276}, {3.91064, 58.87759}, {6.40089, 
                   58.87761}, {7.59676, 58.87761}, {8.74365, 58.38936}, {
                   9.58925, 57.52027}, {10.43486, 56.65118}, {10.90992, 
                   55.47244}, {10.90992, 54.24335}}, {{6.40089, 39.5487}, {
                   3.91064, 39.54868}, {1.8919, 37.47387}, {1.89191, 
                   34.91443}, {1.89192, 32.35502}, {3.91067, 30.2802}, {
                   6.40092, 30.2802}, {8.89117, 30.2802}, {10.90992, 
                   32.35502}, {10.90992, 34.91445}, {10.90992, 36.14354}, {
                   10.43486, 37.32228}, {9.58925, 38.19137}, {8.74365, 
                   39.06045}, {7.59676, 39.5487}, {6.40089, 39.5487}}, {{
                   6.40089, 20.2198}, {3.91064, 20.2198}, {1.89189, 
                   18.14498}, {1.89189, 15.58555}, {1.89189, 13.02612}, {
                   3.91064, 10.9513}, {6.40089, 10.9513}, {8.89115, 
                   10.9513}, {10.9099, 13.02612}, {10.9099, 15.58555}, {
                   10.9099, 18.14498}, {8.89115, 20.2198}, {6.40089, 
                   20.2198}}}]}, {
                AspectRatio -> 1, Axes -> False, Background -> None, Frame -> 
                 None, FrameTicks -> None, ImageSize -> {Automatic, 
                   Dynamic[
                   3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                    Magnification])]}, AspectRatio -> 1, Axes -> False, 
                 Background -> None, Frame -> None, FrameTicks -> None, 
                 ImageSize -> {Automatic, 30}}], CacheGraphics -> False, 
               StripOnInput -> False], 
              GridBox[{{
                 RowBox[{
                   TagBox["\"Name: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    TemplateBox[{"\"LeNet Trained on MNIST Data\"", "\" \"", 
                    
                    TemplateBox[{
                    "\"\[RightGuillemet]\"", 
                    "https://resources.wolframcloud.com/NeuralNetRepository/\
resources/LeNet-Trained-on-MNIST-Data"}, "HyperlinkURL"]}, "RowDefault"], 
                    "SummaryItem"]}], 
                 TagBox["\"\"", "SummaryItem"]}, {
                 RowBox[{
                   TagBox["\"Type: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["\"NeuralNet\"", "SummaryItem"]}], 
                 "\[SpanFromLeft]"}, {
                 RowBox[{
                   TagBox["\"Description: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                   "\"Identify the handwritten digit in an image\"", 
                    "SummaryItem"]}], "\[SpanFromLeft]"}}, 
               GridBoxAlignment -> {
                "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> 
               False, GridBoxItemSize -> {
                "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
               GridBoxSpacings -> {
                "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, 
               BaseStyle -> {
                ShowStringCharacters -> False, NumberMarks -> False, 
                 PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, 
            GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, 
            AutoDelete -> False, 
            GridBoxItemSize -> {
             "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
            BaselinePosition -> {1, 1}], True -> GridBox[{{
              PaneBox[
               ButtonBox[
                DynamicBox[
                 FEPrivate`FrontEndResource["FEBitmaps", "SummaryBoxCloser"]],
                 ButtonFunction :> (Typeset`open$$ = False), Appearance -> 
                None, BaseStyle -> {}, Evaluator -> Automatic, Method -> 
                "Preemptive"], Alignment -> {Center, Center}, ImageSize -> 
               Dynamic[{
                 Automatic, 
                  3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                   Magnification])}]], 
              StyleBox[
               GraphicsBox[{
                 RGBColor[0.37647, 0.56863, 0.16078], 
                 DiskBox[{33, 35}, 43], 
                 GrayLevel[1], 
                 Thickness[0.02055], 
                 CapForm["Butt"], 
                 JoinForm[{"Miter", 10.}], 
                 StyleBox[
                  
                  JoinedCurveBox[{{{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 
                   2, 0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 
                   0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{
                   0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 
                   0}}, {{0, 2, 0}}, {{0, 2, 0}}, {{0, 2, 
                   0}}}, CompressedData["
1:eJxTTMoPSmVmYGAQAWImKOaae/2GapuTQ6yY8Oz+1zIOJVtFf5/m83ewnP5o
1ab1lnC+V9zcZAchNweY+h8FJwuX+/jD+YTUw/i45NH1w/i43IfLPbj0o9sP
k5durIjdzyDrsPnSEpGS9V4Y5sHkH72cuomn1BHDPJh8xrrLHt6lBhj+waUe
3T5C7oH5H10el/vQ3Y/uPkL+I+R+mHm49KO7F91+mDwA6/QRHQ==
                   "], 
                   CurveClosed -> {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
                    0, 0, 0, 0, 0, 0}], {
                   RGBColor[0.8441175, 0.8921574999999999, 0.790195]}, 
                  StripOnInput -> False], 
                 FaceForm[
                  GrayLevel[1]], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}, {1, 3, 3}}}, CompressedData["
1:eJxTTMoPSmVmYGBgAWIBIGYCYn85sSzf4y4OLM97NN5u9XeA8U91lokG5fk5
8PZNCn9+xNlhw7/ziftSfB2CPOc2qLU5OfRqvOUF8e9tyA1Mc3eE80NKVKb/
d3FwWL558sFAoH4Y/4HAqitvgObD+PKLLsoeqQtw8I94xJgK1L/6+ZLvvcyB
Dlxzr99QBZp/fm+7dx+Q77G/VtZC3hnOV/9uLcK6ydkhXWfWOb8nAQ4Kye+i
nORcHAqjPixavybA4aLS7Z91XS4O1R1u5QKlAXD/+L9M+DtfE8GH+Rfmn3+1
x1qZYz0cprGsWAlyD4wPcy/HSSa1gmB3OL99v1r2FW43OF+rR5fF8ogLXL8g
Y3vA0l3OcPNhfFh4wvgw98D0w/gw82F8pdXRtuor3Ry6gNEC8l/lSzVDDgd3
hxvbNDY7Av2f2lvV4bbeHR4+utGvu1vkPODht/0iwz0moH9g4Qvjw9zXFJZw
4lWcHdz9MD7Mf/4OwomHvW3g/Ck3FSb37LGE828V6R0N1TWH618e8zBWT8oU
bj6MD/M/jA/zH0w/jA8zH8ZvZDnab/jdCu7/cl1F+S8qNnD/g+OH2Rbuf3B6
e2gL9/+Xv1cqXgL9A/M/jA9zH39SOtdcdg24+2F8mP9WmJ619nuoDOdnXLhg
f7BVFs6vM2XneOYhDNefvHPp1Qk/WOHmw/gw/8P4MP/B9MP4MPNhfL59BjO1
LBTh6Tt7e2zGusnK8PQv7b7m6PIAVbj/T1/7pbSQVx3uf5h/YP6H8QG+spg4

                  "]], 
                 FaceForm[
                  GrayLevel[1]], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}}}, {{{67.47446, 45.0654}, {67.47446, 42.50597}, {
                   65.45572, 40.43115}, {62.96546, 40.43115}, {60.4752, 
                   40.43115}, {58.45645, 42.50597}, {58.45645, 45.0654}, {
                   58.45645, 47.62484}, {60.4752, 49.69965}, {62.96546, 
                   49.69965}, {65.45572, 49.69965}, {67.47446, 47.62484}, {
                   67.47446, 45.0654}}, {{62.96546, 29.39777}, {60.4752, 
                   29.39777}, {58.45645, 27.32295}, {58.45645, 24.76352}, {
                   58.45645, 22.20409}, {60.4752, 20.12927}, {62.96546, 
                   20.12927}, {65.45572, 20.12927}, {67.47446, 22.20409}, {
                   67.47446, 24.76352}, {67.47446, 25.9926}, {66.99939, 
                   27.17135}, {66.15379, 28.04043}, {65.30819, 28.90952}, {
                   64.1613, 29.39775}, {62.96544, 29.39775}}}], 
                 FaceForm[
                  GrayLevel[1]], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}}}, {{{10.90992, 54.24335}, {10.90992, 51.68393}, {
                   8.89117, 49.6091}, {6.40092, 49.6091}, {3.91067, 
                   49.6091}, {1.89192, 51.68392}, {1.89191, 54.24334}, {
                   1.8919, 56.80276}, {3.91064, 58.87759}, {6.40089, 
                   58.87761}, {7.59676, 58.87761}, {8.74365, 58.38936}, {
                   9.58925, 57.52027}, {10.43486, 56.65118}, {10.90992, 
                   55.47244}, {10.90992, 54.24335}}, {{6.40089, 39.5487}, {
                   3.91064, 39.54868}, {1.8919, 37.47387}, {1.89191, 
                   34.91443}, {1.89192, 32.35502}, {3.91067, 30.2802}, {
                   6.40092, 30.2802}, {8.89117, 30.2802}, {10.90992, 
                   32.35502}, {10.90992, 34.91445}, {10.90992, 36.14354}, {
                   10.43486, 37.32228}, {9.58925, 38.19137}, {8.74365, 
                   39.06045}, {7.59676, 39.5487}, {6.40089, 39.5487}}, {{
                   6.40089, 20.2198}, {3.91064, 20.2198}, {1.89189, 
                   18.14498}, {1.89189, 15.58555}, {1.89189, 13.02612}, {
                   3.91064, 10.9513}, {6.40089, 10.9513}, {8.89115, 
                   10.9513}, {10.9099, 13.02612}, {10.9099, 15.58555}, {
                   10.9099, 18.14498}, {8.89115, 20.2198}, {6.40089, 
                   20.2198}}}]}, {
                AspectRatio -> 1, Axes -> False, Background -> None, Frame -> 
                 None, FrameTicks -> None, ImageSize -> {Automatic, 
                   Dynamic[
                   3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                    Magnification])]}, AspectRatio -> 1, Axes -> False, 
                 Background -> None, Frame -> None, FrameTicks -> None, 
                 ImageSize -> {Automatic, 30}}], CacheGraphics -> False, 
               StripOnInput -> False], 
              GridBox[{{
                 RowBox[{
                   TagBox["\"Name: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    TemplateBox[{"\"LeNet Trained on MNIST Data\"", "\" \"", 
                    
                    TemplateBox[{
                    "\"\[RightGuillemet]\"", 
                    "https://resources.wolframcloud.com/NeuralNetRepository/\
resources/LeNet-Trained-on-MNIST-Data"}, "HyperlinkURL"]}, "RowDefault"], 
                    "SummaryItem"]}], 
                 TagBox["\"\"", "SummaryItem"]}, {
                 RowBox[{
                   TagBox["\"Type: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["\"NeuralNet\"", "SummaryItem"]}], 
                 "\[SpanFromLeft]"}, {
                 RowBox[{
                   TagBox["\"Description: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                   "\"Identify the handwritten digit in an image\"", 
                    "SummaryItem"]}], "\[SpanFromLeft]"}, {
                 RowBox[{
                   TagBox["\"ByteCount: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["1750489", "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox[
                   "\"TrainingSetInformation: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                   "\"MNIST Database of Handwritten Digits, consisting of \
60,000 training and 10,000 test grayscale images of size 28x28.\"", 
                    "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox["\"InputDomains: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    TagBox[
                    
                    TemplateBox[{",", "\",\"", "\"Image\""}, 
                    "RowWithSeparators"], Short], "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox["\"TaskType: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    RowBox[{"{", "\"Classification\"", "}"}], 
                    "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox["\"Keywords: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    TagBox[
                    
                    TemplateBox[{
                    ",", "\",\"", "\"mnist\"", "\"lenet\"", "\"digit\""}, 
                    "RowWithSeparators"], Short], "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox["\"Data Location: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    
                    DynamicModuleBox[{
                    ResourceSystemClient`Private`typesetstorage$$ = 
                    ResourceSystemClient`Private`typesetstorageLocation, 
                    ResourceSystemClient`Private`info$$}, 
                    DynamicBox[
                    ToBoxes[
                    ResourceSystemClient`Private`info$$ = 
                    ResourceSystemClient`Private`resourceInfo[
                    "050b1a0a-f43a-4c28-b7e0-72607a918467"]; If[
                    AssociationQ[ResourceSystemClient`Private`info$$], 
                    ResourceSystemClient`Private`typesetstorage$$[
                    Lookup[
                    ResourceSystemClient`Private`info$$, 
                    "ContentElementLocations", None]], 
                    Missing["NotAvailable"]], StandardForm]], 
                    DynamicModuleValues :> {}], "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox["\"UUID: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                   "\"050b1a0a-f43a-4c28-b7e0-72607a918467\"", 
                    "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox["\"Version: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["\"1.16.0\"", "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox["\"Elements: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    TagBox[
                    
                    RowBox[{
                    "\"ConstructionNotebook\"", ",", 
                    "\"ConstructionNotebookExpression\"", ",", 
                    RowBox[{"\"\"", "\[Ellipsis]", "\"\""}], ",", 
                    "\"UninitializedEvaluationNet\"", ",", 
                    "\"EvaluationExample\""}], Short[#, 2]& ], 
                    "SummaryItem"]}], ""}}, 
               GridBoxAlignment -> {
                "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> 
               False, GridBoxItemSize -> {
                "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
               GridBoxSpacings -> {
                "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, 
               BaseStyle -> {
                ShowStringCharacters -> False, NumberMarks -> False, 
                 PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, 
            GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, 
            AutoDelete -> False, 
            GridBoxItemSize -> {
             "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
            BaselinePosition -> {1, 1}]}, 
         Dynamic[Typeset`open$$], ImageSize -> Automatic]},
       "SummaryPanel"],
      DynamicModuleValues:>{}], "]"}],
    ResourceObject[
     Association[
     "Name" -> "LeNet Trained on MNIST Data", "UUID" -> 
      "050b1a0a-f43a-4c28-b7e0-72607a918467", "ResourceType" -> "NeuralNet", 
      "Version" -> "1.16.0", "Description" -> 
      "Identify the handwritten digit in an image", "RepositoryLocation" -> 
      URL["https://www.wolframcloud.com/obj/resourcesystem/api/1.0"], 
      "WolframLanguageVersionRequired" -> "11.1", 
      "ContentElements" -> {
       "ConstructionNotebook", "ConstructionNotebookExpression", 
        "EvaluationNet", "UninitializedEvaluationNet", "EvaluationExample"}]],
    
    Editable->False,
    SelectWithContents->True,
    Selectable->False], ",", 
   InterpretationBox[
    RowBox[{
     TagBox["ResourceObject",
      "SummaryHead"], "[", 
     DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = 
      "Ready"}, 
      TemplateBox[{
        PaneSelectorBox[{False -> GridBox[{{
              PaneBox[
               ButtonBox[
                DynamicBox[
                 FEPrivate`FrontEndResource["FEBitmaps", "SummaryBoxOpener"]],
                 ButtonFunction :> (Typeset`open$$ = True), Appearance -> 
                None, BaseStyle -> {}, Evaluator -> Automatic, Method -> 
                "Preemptive"], Alignment -> {Center, Center}, ImageSize -> 
               Dynamic[{
                 Automatic, 
                  3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                   Magnification])}]], 
              StyleBox[
               GraphicsBox[{
                 Thickness[0.01667], 
                 FaceForm[
                  RGBColor[0.87451, 0.27843, 0.03137]], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}}}, {{{60., 30.}, {60., 13.43146}, {46.56854, 0.}, {30., 
                  0.}, {13.43146, 0.}, {0., 13.43146}, {0., 30.}, {0., 
                  46.56854}, {13.43146, 60.}, {30., 60.}, {46.56854, 60.}, {
                  60., 46.56854}, {60., 30.}}}], 
                 FaceForm[
                  GrayLevel[1]], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 
                   0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 
                   0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{0, 2, 
                   0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 
                   3}}, {{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}}}, {CompressedData["
1:eJxTTMoPSmViYGAwB2IQffirRky/k5aDLdf1xQW2jg4wPpjb5ehgVxmxwtRX
y+G4ptWk048dHaS1jv2cPUHLwW/nod0xNk4QdVzaDoUgAyY4OdyXuqF1UEjH
YfEkK0bfCGcHlS1PY7p+6zp8zHjcsZXDxaH1deAOOVcDh7NngKDHxWHbTkPb
xEhDh6wlSz+VCbg6aHB96bTZaeSwTeDJgpZUVwdjMDBxYACBBleHrwu5X0Xr
mTqwyDhNndXq6vDT8Nk6VRUzB4nzCxbWR7k6PKwSWef+0MzBA8Rgd3Vo+Mgj
9cvd3CFhg/Q23XsuDlorhS+4VJg7LPmz5Nby2S4O8iAHxZk7VIO0Rbk4xHat
PrVP29xho3HruWyge0VLqj2Tj5g5tBUtim094OywQw6owcLMAai6SqTP2eH3
6XcnDwuZOWgFJeYo1gDlIwKbMx+YOnhdMp2cX+TscJaxybJqjanDvBlfkzSK
nR0er9r0vqvC1OFcx6V7D4D8pzuCrSLcTR3W5n2d86XO2WEJMDSvK5s6BIEs
mujs0H8IGCH+Jg4xIMYfZwdwcIcbO7wBBmNrtgvEHXlGcD7IG1VXDOF8sPrp
hhD/WblAwrPYEEJ/dnZQ/24twupl6BBiFfH/uQ6C/6/2WCtzqhNcPTic5jlC
0kmtIcQ9No5w98L44HAH+gdsP7cjxH16UPkaB0g62WDiMGsmEEQ6wM1D54Pp
vWZwPtiexSYQf+wyhKTTJhOI/8RNoOkKwQfH0w8jSHpIVMPgw9SD3flaE24e
LP2ngcAyBB/mHhgf5l5weIuowflg7jpVaPpwgKg/pA4PHwDU5XPA
                   "], {{
                   25.4, 18.99}, {25.4, 36.79}, {31.77, 36.79}, {31.77, 
                   35.39}, {28.57, 35.08}, {28.5, 35.01}, {28.5, 32.29}, {
                   28.5, 23.38}, {28.5, 20.8}, {28.57, 20.73}, {31.77, 
                   20.42}, {31.77, 18.99}}, CompressedData["
1:eJxTTMoPSmViYGCQAmIQffirRkx/koMDAxhYOsD4ra8Dd8gdtXOYL+/GAeJf
8fB++lbA3uFmVLzKlkIHh6C3lz/OiLR3eMXpbbOgx8Ghqdhtyrc+e4dfO8xC
epY7OGT5fu4LPmLvcO5+ixPLGQcHbk37ld8e2jsE7ZBrff3RweFhlcg6dyAf
RFZdcYbzf9u3//yk5ALnQ9zj4hDEf/EFXxKCD3MfjA9z/3WffTefAfk//c5U
GW6xcGCPn+EjGuLiEMBoMM8x28JB+JPj+TRLFwf9xRF5maYWDr/XcfzbLufi
wO/aaDfxv7nDnpgj5Um/nB1mnfNjc39ojuY+czT3mzssCQ63O33aweHx8Rm7
pz0wd8iJnnJTAej/iVfXzpv8z9whNOubgzYwfNhS1pfXm1g4SC0uDTEFhp+p
2+sVWVkWDs4yrx+ZAcN3iVlh0f7NFg7o8QEAbSezvA==
                   "], {{41.77, 
                   18.99}, {41.77, 20.42}, {44.91, 20.72}, {45.05, 20.8}, {
                   45.05, 23.52}, {45.05, 32.25}, {45.05, 34.97}, {44.91, 
                   35.04}, {41.77, 35.35}, {41.77, 36.78}, {48.15, 36.78}, {
                   48.15, 18.98}}}]}, {
                AspectRatio -> 1, Axes -> False, Background -> None, Frame -> 
                 None, FrameTicks -> None, ImageSize -> {Automatic, 
                   Dynamic[
                   3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                    Magnification])]}, AspectRatio -> 1, Axes -> False, 
                 Background -> None, Frame -> None, FrameTicks -> None, 
                 ImageSize -> {Automatic, 30}}], CacheGraphics -> False, 
               StripOnInput -> False], 
              GridBox[{{
                 RowBox[{
                   TagBox["\"Name: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    TemplateBox[{"\"TraversalOrderSelect\"", "\" \"", 
                    
                    TemplateBox[{
                    "\"\[RightGuillemet]\"", 
                    "https://resources.wolframcloud.com/FunctionRepository/\
resources/TraversalOrderSelect"}, "HyperlinkURL"]}, "RowDefault"], 
                    "SummaryItem"]}], 
                 TagBox["\"\"", "SummaryItem"]}, {
                 RowBox[{
                   TagBox["\"Type: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["\"Function\"", "SummaryItem"]}], 
                 "\[SpanFromLeft]"}, {
                 RowBox[{
                   TagBox["\"Description: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                   "\"Choose positions of an expression by certain \
traversal-ordering criteria\"", "SummaryItem"]}], "\[SpanFromLeft]"}}, 
               GridBoxAlignment -> {
                "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> 
               False, GridBoxItemSize -> {
                "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
               GridBoxSpacings -> {
                "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, 
               BaseStyle -> {
                ShowStringCharacters -> False, NumberMarks -> False, 
                 PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, 
            GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, 
            AutoDelete -> False, 
            GridBoxItemSize -> {
             "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
            BaselinePosition -> {1, 1}], True -> GridBox[{{
              PaneBox[
               ButtonBox[
                DynamicBox[
                 FEPrivate`FrontEndResource["FEBitmaps", "SummaryBoxCloser"]],
                 ButtonFunction :> (Typeset`open$$ = False), Appearance -> 
                None, BaseStyle -> {}, Evaluator -> Automatic, Method -> 
                "Preemptive"], Alignment -> {Center, Center}, ImageSize -> 
               Dynamic[{
                 Automatic, 
                  3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                   Magnification])}]], 
              StyleBox[
               GraphicsBox[{
                 Thickness[0.01667], 
                 FaceForm[
                  RGBColor[0.87451, 0.27843, 0.03137]], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}}}, {{{60., 30.}, {60., 13.43146}, {46.56854, 0.}, {30., 
                  0.}, {13.43146, 0.}, {0., 13.43146}, {0., 30.}, {0., 
                  46.56854}, {13.43146, 60.}, {30., 60.}, {46.56854, 60.}, {
                  60., 46.56854}, {60., 30.}}}], 
                 FaceForm[
                  GrayLevel[1]], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 
                   0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 
                   0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{0, 2, 
                   0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 
                   3}}, {{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}}}, {CompressedData["
1:eJxTTMoPSmViYGAwB2IQffirRky/k5aDLdf1xQW2jg4wPpjb5ehgVxmxwtRX
y+G4ptWk048dHaS1jv2cPUHLwW/nod0xNk4QdVzaDoUgAyY4OdyXuqF1UEjH
YfEkK0bfCGcHlS1PY7p+6zp8zHjcsZXDxaH1deAOOVcDh7NngKDHxWHbTkPb
xEhDh6wlSz+VCbg6aHB96bTZaeSwTeDJgpZUVwdjMDBxYACBBleHrwu5X0Xr
mTqwyDhNndXq6vDT8Nk6VRUzB4nzCxbWR7k6PKwSWef+0MzBA8Rgd3Vo+Mgj
9cvd3CFhg/Q23XsuDlorhS+4VJg7LPmz5Nby2S4O8iAHxZk7VIO0Rbk4xHat
PrVP29xho3HruWyge0VLqj2Tj5g5tBUtim094OywQw6owcLMAai6SqTP2eH3
6XcnDwuZOWgFJeYo1gDlIwKbMx+YOnhdMp2cX+TscJaxybJqjanDvBlfkzSK
nR0er9r0vqvC1OFcx6V7D4D8pzuCrSLcTR3W5n2d86XO2WEJMDSvK5s6BIEs
mujs0H8IGCH+Jg4xIMYfZwdwcIcbO7wBBmNrtgvEHXlGcD7IG1VXDOF8sPrp
hhD/WblAwrPYEEJ/dnZQ/24twupl6BBiFfH/uQ6C/6/2WCtzqhNcPTic5jlC
0kmtIcQ9No5w98L44HAH+gdsP7cjxH16UPkaB0g62WDiMGsmEEQ6wM1D54Pp
vWZwPtiexSYQf+wyhKTTJhOI/8RNoOkKwQfH0w8jSHpIVMPgw9SD3flaE24e
LP2ngcAyBB/mHhgf5l5weIuowflg7jpVaPpwgKg/pA4PHwDU5XPA
                   "], {{
                   25.4, 18.99}, {25.4, 36.79}, {31.77, 36.79}, {31.77, 
                   35.39}, {28.57, 35.08}, {28.5, 35.01}, {28.5, 32.29}, {
                   28.5, 23.38}, {28.5, 20.8}, {28.57, 20.73}, {31.77, 
                   20.42}, {31.77, 18.99}}, CompressedData["
1:eJxTTMoPSmViYGCQAmIQffirRkx/koMDAxhYOsD4ra8Dd8gdtXOYL+/GAeJf
8fB++lbA3uFmVLzKlkIHh6C3lz/OiLR3eMXpbbOgx8Ghqdhtyrc+e4dfO8xC
epY7OGT5fu4LPmLvcO5+ixPLGQcHbk37ld8e2jsE7ZBrff3RweFhlcg6dyAf
RFZdcYbzf9u3//yk5ALnQ9zj4hDEf/EFXxKCD3MfjA9z/3WffTefAfk//c5U
GW6xcGCPn+EjGuLiEMBoMM8x28JB+JPj+TRLFwf9xRF5maYWDr/XcfzbLufi
wO/aaDfxv7nDnpgj5Um/nB1mnfNjc39ojuY+czT3mzssCQ63O33aweHx8Rm7
pz0wd8iJnnJTAej/iVfXzpv8z9whNOubgzYwfNhS1pfXm1g4SC0uDTEFhp+p
2+sVWVkWDs4yrx+ZAcN3iVlh0f7NFg7o8QEAbSezvA==
                   "], {{41.77, 
                   18.99}, {41.77, 20.42}, {44.91, 20.72}, {45.05, 20.8}, {
                   45.05, 23.52}, {45.05, 32.25}, {45.05, 34.97}, {44.91, 
                   35.04}, {41.77, 35.35}, {41.77, 36.78}, {48.15, 36.78}, {
                   48.15, 18.98}}}]}, {
                AspectRatio -> 1, Axes -> False, Background -> None, Frame -> 
                 None, FrameTicks -> None, ImageSize -> {Automatic, 
                   Dynamic[
                   3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                    Magnification])]}, AspectRatio -> 1, Axes -> False, 
                 Background -> None, Frame -> None, FrameTicks -> None, 
                 ImageSize -> {Automatic, 30}}], CacheGraphics -> False, 
               StripOnInput -> False], 
              GridBox[{{
                 RowBox[{
                   TagBox["\"Name: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    TemplateBox[{"\"TraversalOrderSelect\"", "\" \"", 
                    
                    TemplateBox[{
                    "\"\[RightGuillemet]\"", 
                    "https://resources.wolframcloud.com/FunctionRepository/\
resources/TraversalOrderSelect"}, "HyperlinkURL"]}, "RowDefault"], 
                    "SummaryItem"]}], 
                 TagBox["\"\"", "SummaryItem"]}, {
                 RowBox[{
                   TagBox["\"Type: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["\"Function\"", "SummaryItem"]}], 
                 "\[SpanFromLeft]"}, {
                 RowBox[{
                   TagBox["\"Description: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                   "\"Choose positions of an expression by certain \
traversal-ordering criteria\"", "SummaryItem"]}], "\[SpanFromLeft]"}, {
                 RowBox[{
                   TagBox["\"Keywords: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    TagBox[
                    
                    TemplateBox[{
                    ",", "\",\"", "\"combinators\"", "\"rewriting systems\"", 
                    "\"sorting functions\"", "\"metaprogramming\""}, 
                    "RowWithSeparators"], Short], "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox["\"Documentation: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    
                    TemplateBox[{
                    "\"https://resources.wolframcloud.com/FunctionRepository/\
resources/TraversalOrderSelect\"", 
                    "https://resources.wolframcloud.com/FunctionRepository/\
resources/TraversalOrderSelect"}, "HyperlinkURL"], "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox["\"UUID: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                   "\"0889999c-ca3f-4e3c-86e8-ca0022aebe61\"", 
                    "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox["\"Version: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["\"1.0.0\"", "SummaryItem"]}], ""}}, 
               GridBoxAlignment -> {
                "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> 
               False, GridBoxItemSize -> {
                "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
               GridBoxSpacings -> {
                "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, 
               BaseStyle -> {
                ShowStringCharacters -> False, NumberMarks -> False, 
                 PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, 
            GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, 
            AutoDelete -> False, 
            GridBoxItemSize -> {
             "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
            BaselinePosition -> {1, 1}]}, 
         Dynamic[Typeset`open$$], ImageSize -> Automatic]},
       "SummaryPanel"],
      DynamicModuleValues:>{}], "]"}],
    ResourceObject[
     Association[
     "Name" -> "TraversalOrderSelect", "ShortName" -> "TraversalOrderSelect", 
      "UUID" -> "0889999c-ca3f-4e3c-86e8-ca0022aebe61", "ResourceType" -> 
      "Function", "Version" -> "1.0.0", "Description" -> 
      "Choose positions of an expression by certain traversal-ordering \
criteria", "RepositoryLocation" -> 
      URL["https://www.wolframcloud.com/obj/resourcesystem/api/1.0"], 
      "SymbolName" -> 
      "FunctionRepository`$be529ec6932f4c35bb4fde4540bbeb70`\
TraversalOrderSelect", "FunctionLocation" -> 
      CloudObject[
       "https://www.wolframcloud.com/obj/1da6d364-33c2-4305-a908-\
62e9dfb54664"]]],
    Editable->False,
    SelectWithContents->True,
    Selectable->False], ",", 
   InterpretationBox[
    RowBox[{
     TagBox["ResourceObject",
      "SummaryHead"], "[", 
     DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = 
      "Ready"}, 
      TemplateBox[{
        PaneSelectorBox[{False -> GridBox[{{
              PaneBox[
               ButtonBox[
                DynamicBox[
                 FEPrivate`FrontEndResource["FEBitmaps", "SummaryBoxOpener"]],
                 ButtonFunction :> (Typeset`open$$ = True), Appearance -> 
                None, BaseStyle -> {}, Evaluator -> Automatic, Method -> 
                "Preemptive"], Alignment -> {Center, Center}, ImageSize -> 
               Dynamic[{
                 Automatic, 
                  3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                   Magnification])}]], 
              StyleBox[
               GraphicsBox[{
                 Thickness[0.01667], 
                 FaceForm[
                  RGBColor[0.87451, 0.27843, 0.03137]], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}}}, {{{60., 30.}, {60., 13.43146}, {46.56854, 0.}, {30., 
                  0.}, {13.43146, 0.}, {0., 13.43146}, {0., 30.}, {0., 
                  46.56854}, {13.43146, 60.}, {30., 60.}, {46.56854, 60.}, {
                  60., 46.56854}, {60., 30.}}}], 
                 FaceForm[
                  GrayLevel[1]], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 
                   0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 
                   0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{0, 2, 
                   0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 
                   3}}, {{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}}}, {CompressedData["
1:eJxTTMoPSmViYGAwB2IQffirRky/k5aDLdf1xQW2jg4wPpjb5ehgVxmxwtRX
y+G4ptWk048dHaS1jv2cPUHLwW/nod0xNk4QdVzaDoUgAyY4OdyXuqF1UEjH
YfEkK0bfCGcHlS1PY7p+6zp8zHjcsZXDxaH1deAOOVcDh7NngKDHxWHbTkPb
xEhDh6wlSz+VCbg6aHB96bTZaeSwTeDJgpZUVwdjMDBxYACBBleHrwu5X0Xr
mTqwyDhNndXq6vDT8Nk6VRUzB4nzCxbWR7k6PKwSWef+0MzBA8Rgd3Vo+Mgj
9cvd3CFhg/Q23XsuDlorhS+4VJg7LPmz5Nby2S4O8iAHxZk7VIO0Rbk4xHat
PrVP29xho3HruWyge0VLqj2Tj5g5tBUtim094OywQw6owcLMAai6SqTP2eH3
6XcnDwuZOWgFJeYo1gDlIwKbMx+YOnhdMp2cX+TscJaxybJqjanDvBlfkzSK
nR0er9r0vqvC1OFcx6V7D4D8pzuCrSLcTR3W5n2d86XO2WEJMDSvK5s6BIEs
mujs0H8IGCH+Jg4xIMYfZwdwcIcbO7wBBmNrtgvEHXlGcD7IG1VXDOF8sPrp
hhD/WblAwrPYEEJ/dnZQ/24twupl6BBiFfH/uQ6C/6/2WCtzqhNcPTic5jlC
0kmtIcQ9No5w98L44HAH+gdsP7cjxH16UPkaB0g62WDiMGsmEEQ6wM1D54Pp
vWZwPtiexSYQf+wyhKTTJhOI/8RNoOkKwQfH0w8jSHpIVMPgw9SD3flaE24e
LP2ngcAyBB/mHhgf5l5weIuowflg7jpVaPpwgKg/pA4PHwDU5XPA
                   "], {{
                   25.4, 18.99}, {25.4, 36.79}, {31.77, 36.79}, {31.77, 
                   35.39}, {28.57, 35.08}, {28.5, 35.01}, {28.5, 32.29}, {
                   28.5, 23.38}, {28.5, 20.8}, {28.57, 20.73}, {31.77, 
                   20.42}, {31.77, 18.99}}, CompressedData["
1:eJxTTMoPSmViYGCQAmIQffirRkx/koMDAxhYOsD4ra8Dd8gdtXOYL+/GAeJf
8fB++lbA3uFmVLzKlkIHh6C3lz/OiLR3eMXpbbOgx8Ghqdhtyrc+e4dfO8xC
epY7OGT5fu4LPmLvcO5+ixPLGQcHbk37ld8e2jsE7ZBrff3RweFhlcg6dyAf
RFZdcYbzf9u3//yk5ALnQ9zj4hDEf/EFXxKCD3MfjA9z/3WffTefAfk//c5U
GW6xcGCPn+EjGuLiEMBoMM8x28JB+JPj+TRLFwf9xRF5maYWDr/XcfzbLufi
wO/aaDfxv7nDnpgj5Um/nB1mnfNjc39ojuY+czT3mzssCQ63O33aweHx8Rm7
pz0wd8iJnnJTAej/iVfXzpv8z9whNOubgzYwfNhS1pfXm1g4SC0uDTEFhp+p
2+sVWVkWDs4yrx+ZAcN3iVlh0f7NFg7o8QEAbSezvA==
                   "], {{41.77, 
                   18.99}, {41.77, 20.42}, {44.91, 20.72}, {45.05, 20.8}, {
                   45.05, 23.52}, {45.05, 32.25}, {45.05, 34.97}, {44.91, 
                   35.04}, {41.77, 35.35}, {41.77, 36.78}, {48.15, 36.78}, {
                   48.15, 18.98}}}]}, {
                AspectRatio -> 1, Axes -> False, Background -> None, Frame -> 
                 None, FrameTicks -> None, ImageSize -> {Automatic, 
                   Dynamic[
                   3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                    Magnification])]}, AspectRatio -> 1, Axes -> False, 
                 Background -> None, Frame -> None, FrameTicks -> None, 
                 ImageSize -> {Automatic, 30}}], CacheGraphics -> False, 
               StripOnInput -> False], 
              GridBox[{{
                 RowBox[{
                   TagBox["\"Name: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    TemplateBox[{"\"CombinatorStep\"", "\" \"", 
                    
                    TemplateBox[{
                    "\"\[RightGuillemet]\"", 
                    "https://resources.wolframcloud.com/FunctionRepository/\
resources/CombinatorStep"}, "HyperlinkURL"]}, "RowDefault"], "SummaryItem"]}], 
                 TagBox["\"\"", "SummaryItem"]}, {
                 RowBox[{
                   TagBox["\"Type: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["\"Function\"", "SummaryItem"]}], 
                 "\[SpanFromLeft]"}, {
                 TagBox[
                  DynamicModuleBox[{ResourceSystemClient`Private`len$$ = 1}, 
                   RowBox[{
                    TagBox["\"Description: \"", "SummaryItemAnnotation"], 
                    "\[InvisibleSpace]", 
                    TagBox[
                    ButtonBox[
                    DynamicBox[
                    ToBoxes[
                    Replace[
                    ResourceSystemClient`Private`snipDots[
                    "Perform an update to a combinator expression based on \
defined rules and traversal scheme", ResourceSystemClient`Private`len$$], 
                    Except[
                    Blank[String]] -> 
                    Snippet[
                    "Perform an update to a combinator expression based on \
defined rules and traversal scheme", ResourceSystemClient`Private`len$$], {
                    0}], StandardForm]], 
                    ButtonFunction :> (ResourceSystemClient`Private`len$$ = 
                    Ceiling[ResourceSystemClient`Private`len$$ 1.5]), 
                    Appearance -> None, BaseStyle -> {}, Evaluator -> 
                    Automatic, Method -> "Preemptive"], "SummaryItem"]}], 
                   DynamicModuleValues :> {}], "SummaryItem"], 
                 "\[SpanFromLeft]"}}, 
               GridBoxAlignment -> {
                "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> 
               False, GridBoxItemSize -> {
                "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
               GridBoxSpacings -> {
                "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, 
               BaseStyle -> {
                ShowStringCharacters -> False, NumberMarks -> False, 
                 PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, 
            GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, 
            AutoDelete -> False, 
            GridBoxItemSize -> {
             "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
            BaselinePosition -> {1, 1}], True -> GridBox[{{
              PaneBox[
               ButtonBox[
                DynamicBox[
                 FEPrivate`FrontEndResource["FEBitmaps", "SummaryBoxCloser"]],
                 ButtonFunction :> (Typeset`open$$ = False), Appearance -> 
                None, BaseStyle -> {}, Evaluator -> Automatic, Method -> 
                "Preemptive"], Alignment -> {Center, Center}, ImageSize -> 
               Dynamic[{
                 Automatic, 
                  3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                   Magnification])}]], 
              StyleBox[
               GraphicsBox[{
                 Thickness[0.01667], 
                 FaceForm[
                  RGBColor[0.87451, 0.27843, 0.03137]], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}}}, {{{60., 30.}, {60., 13.43146}, {46.56854, 0.}, {30., 
                  0.}, {13.43146, 0.}, {0., 13.43146}, {0., 30.}, {0., 
                  46.56854}, {13.43146, 60.}, {30., 60.}, {46.56854, 60.}, {
                  60., 46.56854}, {60., 30.}}}], 
                 FaceForm[
                  GrayLevel[1]], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 
                   0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 
                   0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{0, 2, 
                   0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 
                   3}}, {{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}}}, {CompressedData["
1:eJxTTMoPSmViYGAwB2IQffirRky/k5aDLdf1xQW2jg4wPpjb5ehgVxmxwtRX
y+G4ptWk048dHaS1jv2cPUHLwW/nod0xNk4QdVzaDoUgAyY4OdyXuqF1UEjH
YfEkK0bfCGcHlS1PY7p+6zp8zHjcsZXDxaH1deAOOVcDh7NngKDHxWHbTkPb
xEhDh6wlSz+VCbg6aHB96bTZaeSwTeDJgpZUVwdjMDBxYACBBleHrwu5X0Xr
mTqwyDhNndXq6vDT8Nk6VRUzB4nzCxbWR7k6PKwSWef+0MzBA8Rgd3Vo+Mgj
9cvd3CFhg/Q23XsuDlorhS+4VJg7LPmz5Nby2S4O8iAHxZk7VIO0Rbk4xHat
PrVP29xho3HruWyge0VLqj2Tj5g5tBUtim094OywQw6owcLMAai6SqTP2eH3
6XcnDwuZOWgFJeYo1gDlIwKbMx+YOnhdMp2cX+TscJaxybJqjanDvBlfkzSK
nR0er9r0vqvC1OFcx6V7D4D8pzuCrSLcTR3W5n2d86XO2WEJMDSvK5s6BIEs
mujs0H8IGCH+Jg4xIMYfZwdwcIcbO7wBBmNrtgvEHXlGcD7IG1VXDOF8sPrp
hhD/WblAwrPYEEJ/dnZQ/24twupl6BBiFfH/uQ6C/6/2WCtzqhNcPTic5jlC
0kmtIcQ9No5w98L44HAH+gdsP7cjxH16UPkaB0g62WDiMGsmEEQ6wM1D54Pp
vWZwPtiexSYQf+wyhKTTJhOI/8RNoOkKwQfH0w8jSHpIVMPgw9SD3flaE24e
LP2ngcAyBB/mHhgf5l5weIuowflg7jpVaPpwgKg/pA4PHwDU5XPA
                   "], {{
                   25.4, 18.99}, {25.4, 36.79}, {31.77, 36.79}, {31.77, 
                   35.39}, {28.57, 35.08}, {28.5, 35.01}, {28.5, 32.29}, {
                   28.5, 23.38}, {28.5, 20.8}, {28.57, 20.73}, {31.77, 
                   20.42}, {31.77, 18.99}}, CompressedData["
1:eJxTTMoPSmViYGCQAmIQffirRkx/koMDAxhYOsD4ra8Dd8gdtXOYL+/GAeJf
8fB++lbA3uFmVLzKlkIHh6C3lz/OiLR3eMXpbbOgx8Ghqdhtyrc+e4dfO8xC
epY7OGT5fu4LPmLvcO5+ixPLGQcHbk37ld8e2jsE7ZBrff3RweFhlcg6dyAf
RFZdcYbzf9u3//yk5ALnQ9zj4hDEf/EFXxKCD3MfjA9z/3WffTefAfk//c5U
GW6xcGCPn+EjGuLiEMBoMM8x28JB+JPj+TRLFwf9xRF5maYWDr/XcfzbLufi
wO/aaDfxv7nDnpgj5Um/nB1mnfNjc39ojuY+czT3mzssCQ63O33aweHx8Rm7
pz0wd8iJnnJTAej/iVfXzpv8z9whNOubgzYwfNhS1pfXm1g4SC0uDTEFhp+p
2+sVWVkWDs4yrx+ZAcN3iVlh0f7NFg7o8QEAbSezvA==
                   "], {{41.77, 
                   18.99}, {41.77, 20.42}, {44.91, 20.72}, {45.05, 20.8}, {
                   45.05, 23.52}, {45.05, 32.25}, {45.05, 34.97}, {44.91, 
                   35.04}, {41.77, 35.35}, {41.77, 36.78}, {48.15, 36.78}, {
                   48.15, 18.98}}}]}, {
                AspectRatio -> 1, Axes -> False, Background -> None, Frame -> 
                 None, FrameTicks -> None, ImageSize -> {Automatic, 
                   Dynamic[
                   3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                    Magnification])]}, AspectRatio -> 1, Axes -> False, 
                 Background -> None, Frame -> None, FrameTicks -> None, 
                 ImageSize -> {Automatic, 30}}], CacheGraphics -> False, 
               StripOnInput -> False], 
              GridBox[{{
                 RowBox[{
                   TagBox["\"Name: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    TemplateBox[{"\"CombinatorStep\"", "\" \"", 
                    
                    TemplateBox[{
                    "\"\[RightGuillemet]\"", 
                    "https://resources.wolframcloud.com/FunctionRepository/\
resources/CombinatorStep"}, "HyperlinkURL"]}, "RowDefault"], "SummaryItem"]}], 
                 TagBox["\"\"", "SummaryItem"]}, {
                 RowBox[{
                   TagBox["\"Type: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["\"Function\"", "SummaryItem"]}], 
                 "\[SpanFromLeft]"}, {
                 TagBox[
                  DynamicModuleBox[{ResourceSystemClient`Private`len$$ = 1}, 
                   RowBox[{
                    TagBox["\"Description: \"", "SummaryItemAnnotation"], 
                    "\[InvisibleSpace]", 
                    TagBox[
                    ButtonBox[
                    DynamicBox[
                    ToBoxes[
                    Replace[
                    ResourceSystemClient`Private`snipDots[
                    "Perform an update to a combinator expression based on \
defined rules and traversal scheme", ResourceSystemClient`Private`len$$], 
                    Except[
                    Blank[String]] -> 
                    Snippet[
                    "Perform an update to a combinator expression based on \
defined rules and traversal scheme", ResourceSystemClient`Private`len$$], {
                    0}], StandardForm]], 
                    ButtonFunction :> (ResourceSystemClient`Private`len$$ = 
                    Ceiling[ResourceSystemClient`Private`len$$ 1.5]), 
                    Appearance -> None, BaseStyle -> {}, Evaluator -> 
                    Automatic, Method -> "Preemptive"], "SummaryItem"]}], 
                   DynamicModuleValues :> {}], "SummaryItem"], 
                 "\[SpanFromLeft]"}, {
                 RowBox[{
                   TagBox["\"Keywords: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    TagBox[
                    
                    TemplateBox[{
                    ",", "\",\"", "\"combinators\"", "\"rewriting systems\""},
                     "RowWithSeparators"], Short], "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox["\"Documentation: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    
                    TemplateBox[{
                    "\"https://resources.wolframcloud.com/FunctionRepository/\
resources/CombinatorStep\"", 
                    "https://resources.wolframcloud.com/FunctionRepository/\
resources/CombinatorStep"}, "HyperlinkURL"], "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox["\"UUID: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                   "\"51b06e79-1082-481e-91fd-30c0817e2b7e\"", 
                    "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox["\"Version: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["\"1.0.2\"", "SummaryItem"]}], ""}}, 
               GridBoxAlignment -> {
                "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> 
               False, GridBoxItemSize -> {
                "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
               GridBoxSpacings -> {
                "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, 
               BaseStyle -> {
                ShowStringCharacters -> False, NumberMarks -> False, 
                 PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, 
            GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, 
            AutoDelete -> False, 
            GridBoxItemSize -> {
             "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
            BaselinePosition -> {1, 1}]}, 
         Dynamic[Typeset`open$$], ImageSize -> Automatic]},
       "SummaryPanel"],
      DynamicModuleValues:>{}], "]"}],
    ResourceObject[
     Association[
     "Name" -> "CombinatorStep", "ShortName" -> "CombinatorStep", "UUID" -> 
      "51b06e79-1082-481e-91fd-30c0817e2b7e", "ResourceType" -> "Function", 
      "Version" -> "1.0.2", "Description" -> 
      "Perform an update to a combinator expression based on defined rules \
and traversal scheme", "RepositoryLocation" -> 
      URL["https://www.wolframcloud.com/obj/resourcesystem/api/1.0"], 
      "SymbolName" -> 
      "FunctionRepository`$2832ae94caf348d6a13a7e068b0b03d1`CombinatorStep", 
      "FunctionLocation" -> 
      CloudObject[
       "https://www.wolframcloud.com/obj/e0058600-447b-4b5a-894e-\
3fe8218a6e2c"]]],
    Editable->False,
    SelectWithContents->True,
    Selectable->False], ",", 
   InterpretationBox[
    RowBox[{
     TagBox["ResourceObject",
      "SummaryHead"], "[", 
     DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = 
      "Ready"}, 
      TemplateBox[{
        PaneSelectorBox[{False -> GridBox[{{
              PaneBox[
               ButtonBox[
                DynamicBox[
                 FEPrivate`FrontEndResource["FEBitmaps", "SummaryBoxOpener"]],
                 ButtonFunction :> (Typeset`open$$ = True), Appearance -> 
                None, BaseStyle -> {}, Evaluator -> Automatic, Method -> 
                "Preemptive"], Alignment -> {Center, Center}, ImageSize -> 
               Dynamic[{
                 Automatic, 
                  3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                   Magnification])}]], 
              StyleBox[
               GraphicsBox[{
                 Thickness[0.01667], 
                 FaceForm[
                  RGBColor[0.87451, 0.27843, 0.03137]], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}}}, {{{60., 30.}, {60., 13.43146}, {46.56854, 0.}, {30., 
                  0.}, {13.43146, 0.}, {0., 13.43146}, {0., 30.}, {0., 
                  46.56854}, {13.43146, 60.}, {30., 60.}, {46.56854, 60.}, {
                  60., 46.56854}, {60., 30.}}}], 
                 FaceForm[
                  GrayLevel[1]], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 
                   0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 
                   0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{0, 2, 
                   0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 
                   3}}, {{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}}}, {CompressedData["
1:eJxTTMoPSmViYGAwB2IQffirRky/k5aDLdf1xQW2jg4wPpjb5ehgVxmxwtRX
y+G4ptWk048dHaS1jv2cPUHLwW/nod0xNk4QdVzaDoUgAyY4OdyXuqF1UEjH
YfEkK0bfCGcHlS1PY7p+6zp8zHjcsZXDxaH1deAOOVcDh7NngKDHxWHbTkPb
xEhDh6wlSz+VCbg6aHB96bTZaeSwTeDJgpZUVwdjMDBxYACBBleHrwu5X0Xr
mTqwyDhNndXq6vDT8Nk6VRUzB4nzCxbWR7k6PKwSWef+0MzBA8Rgd3Vo+Mgj
9cvd3CFhg/Q23XsuDlorhS+4VJg7LPmz5Nby2S4O8iAHxZk7VIO0Rbk4xHat
PrVP29xho3HruWyge0VLqj2Tj5g5tBUtim094OywQw6owcLMAai6SqTP2eH3
6XcnDwuZOWgFJeYo1gDlIwKbMx+YOnhdMp2cX+TscJaxybJqjanDvBlfkzSK
nR0er9r0vqvC1OFcx6V7D4D8pzuCrSLcTR3W5n2d86XO2WEJMDSvK5s6BIEs
mujs0H8IGCH+Jg4xIMYfZwdwcIcbO7wBBmNrtgvEHXlGcD7IG1VXDOF8sPrp
hhD/WblAwrPYEEJ/dnZQ/24twupl6BBiFfH/uQ6C/6/2WCtzqhNcPTic5jlC
0kmtIcQ9No5w98L44HAH+gdsP7cjxH16UPkaB0g62WDiMGsmEEQ6wM1D54Pp
vWZwPtiexSYQf+wyhKTTJhOI/8RNoOkKwQfH0w8jSHpIVMPgw9SD3flaE24e
LP2ngcAyBB/mHhgf5l5weIuowflg7jpVaPpwgKg/pA4PHwDU5XPA
                   "], {{
                   25.4, 18.99}, {25.4, 36.79}, {31.77, 36.79}, {31.77, 
                   35.39}, {28.57, 35.08}, {28.5, 35.01}, {28.5, 32.29}, {
                   28.5, 23.38}, {28.5, 20.8}, {28.57, 20.73}, {31.77, 
                   20.42}, {31.77, 18.99}}, CompressedData["
1:eJxTTMoPSmViYGCQAmIQffirRkx/koMDAxhYOsD4ra8Dd8gdtXOYL+/GAeJf
8fB++lbA3uFmVLzKlkIHh6C3lz/OiLR3eMXpbbOgx8Ghqdhtyrc+e4dfO8xC
epY7OGT5fu4LPmLvcO5+ixPLGQcHbk37ld8e2jsE7ZBrff3RweFhlcg6dyAf
RFZdcYbzf9u3//yk5ALnQ9zj4hDEf/EFXxKCD3MfjA9z/3WffTefAfk//c5U
GW6xcGCPn+EjGuLiEMBoMM8x28JB+JPj+TRLFwf9xRF5maYWDr/XcfzbLufi
wO/aaDfxv7nDnpgj5Um/nB1mnfNjc39ojuY+czT3mzssCQ63O33aweHx8Rm7
pz0wd8iJnnJTAej/iVfXzpv8z9whNOubgzYwfNhS1pfXm1g4SC0uDTEFhp+p
2+sVWVkWDs4yrx+ZAcN3iVlh0f7NFg7o8QEAbSezvA==
                   "], {{41.77, 
                   18.99}, {41.77, 20.42}, {44.91, 20.72}, {45.05, 20.8}, {
                   45.05, 23.52}, {45.05, 32.25}, {45.05, 34.97}, {44.91, 
                   35.04}, {41.77, 35.35}, {41.77, 36.78}, {48.15, 36.78}, {
                   48.15, 18.98}}}]}, {
                AspectRatio -> 1, Axes -> False, Background -> None, Frame -> 
                 None, FrameTicks -> None, ImageSize -> {Automatic, 
                   Dynamic[
                   3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                    Magnification])]}, AspectRatio -> 1, Axes -> False, 
                 Background -> None, Frame -> None, FrameTicks -> None, 
                 ImageSize -> {Automatic, 30}}], CacheGraphics -> False, 
               StripOnInput -> False], 
              GridBox[{{
                 RowBox[{
                   TagBox["\"Name: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    TemplateBox[{"\"CombinatorFixedPointList\"", "\" \"", 
                    
                    TemplateBox[{
                    "\"\[RightGuillemet]\"", 
                    "https://resources.wolframcloud.com/FunctionRepository/\
resources/CombinatorFixedPointList"}, "HyperlinkURL"]}, "RowDefault"], 
                    "SummaryItem"]}], 
                 TagBox["\"\"", "SummaryItem"]}, {
                 RowBox[{
                   TagBox["\"Type: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["\"Function\"", "SummaryItem"]}], 
                 "\[SpanFromLeft]"}, {
                 TagBox[
                  DynamicModuleBox[{ResourceSystemClient`Private`len$$ = 1}, 
                   RowBox[{
                    TagBox["\"Description: \"", "SummaryItemAnnotation"], 
                    "\[InvisibleSpace]", 
                    TagBox[
                    ButtonBox[
                    DynamicBox[
                    ToBoxes[
                    Replace[
                    ResourceSystemClient`Private`snipDots[
                    "Show the evolution of a combinator expression to its \
fixed point based on defined rules and evaluation scheme", 
                    ResourceSystemClient`Private`len$$], Except[
                    Blank[String]] -> 
                    Snippet[
                    "Show the evolution of a combinator expression to its \
fixed point based on defined rules and evaluation scheme", 
                    ResourceSystemClient`Private`len$$], {0}], StandardForm]],
                     ButtonFunction :> (ResourceSystemClient`Private`len$$ = 
                    Ceiling[ResourceSystemClient`Private`len$$ 1.5]), 
                    Appearance -> None, BaseStyle -> {}, Evaluator -> 
                    Automatic, Method -> "Preemptive"], "SummaryItem"]}], 
                   DynamicModuleValues :> {}], "SummaryItem"], 
                 "\[SpanFromLeft]"}}, 
               GridBoxAlignment -> {
                "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> 
               False, GridBoxItemSize -> {
                "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
               GridBoxSpacings -> {
                "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, 
               BaseStyle -> {
                ShowStringCharacters -> False, NumberMarks -> False, 
                 PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, 
            GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, 
            AutoDelete -> False, 
            GridBoxItemSize -> {
             "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
            BaselinePosition -> {1, 1}], True -> GridBox[{{
              PaneBox[
               ButtonBox[
                DynamicBox[
                 FEPrivate`FrontEndResource["FEBitmaps", "SummaryBoxCloser"]],
                 ButtonFunction :> (Typeset`open$$ = False), Appearance -> 
                None, BaseStyle -> {}, Evaluator -> Automatic, Method -> 
                "Preemptive"], Alignment -> {Center, Center}, ImageSize -> 
               Dynamic[{
                 Automatic, 
                  3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                   Magnification])}]], 
              StyleBox[
               GraphicsBox[{
                 Thickness[0.01667], 
                 FaceForm[
                  RGBColor[0.87451, 0.27843, 0.03137]], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}}}, {{{60., 30.}, {60., 13.43146}, {46.56854, 0.}, {30., 
                  0.}, {13.43146, 0.}, {0., 13.43146}, {0., 30.}, {0., 
                  46.56854}, {13.43146, 60.}, {30., 60.}, {46.56854, 60.}, {
                  60., 46.56854}, {60., 30.}}}], 
                 FaceForm[
                  GrayLevel[1]], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 
                   0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 
                   0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{0, 2, 
                   0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 
                   3}}, {{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}}}, {CompressedData["
1:eJxTTMoPSmViYGAwB2IQffirRky/k5aDLdf1xQW2jg4wPpjb5ehgVxmxwtRX
y+G4ptWk048dHaS1jv2cPUHLwW/nod0xNk4QdVzaDoUgAyY4OdyXuqF1UEjH
YfEkK0bfCGcHlS1PY7p+6zp8zHjcsZXDxaH1deAOOVcDh7NngKDHxWHbTkPb
xEhDh6wlSz+VCbg6aHB96bTZaeSwTeDJgpZUVwdjMDBxYACBBleHrwu5X0Xr
mTqwyDhNndXq6vDT8Nk6VRUzB4nzCxbWR7k6PKwSWef+0MzBA8Rgd3Vo+Mgj
9cvd3CFhg/Q23XsuDlorhS+4VJg7LPmz5Nby2S4O8iAHxZk7VIO0Rbk4xHat
PrVP29xho3HruWyge0VLqj2Tj5g5tBUtim094OywQw6owcLMAai6SqTP2eH3
6XcnDwuZOWgFJeYo1gDlIwKbMx+YOnhdMp2cX+TscJaxybJqjanDvBlfkzSK
nR0er9r0vqvC1OFcx6V7D4D8pzuCrSLcTR3W5n2d86XO2WEJMDSvK5s6BIEs
mujs0H8IGCH+Jg4xIMYfZwdwcIcbO7wBBmNrtgvEHXlGcD7IG1VXDOF8sPrp
hhD/WblAwrPYEEJ/dnZQ/24twupl6BBiFfH/uQ6C/6/2WCtzqhNcPTic5jlC
0kmtIcQ9No5w98L44HAH+gdsP7cjxH16UPkaB0g62WDiMGsmEEQ6wM1D54Pp
vWZwPtiexSYQf+wyhKTTJhOI/8RNoOkKwQfH0w8jSHpIVMPgw9SD3flaE24e
LP2ngcAyBB/mHhgf5l5weIuowflg7jpVaPpwgKg/pA4PHwDU5XPA
                   "], {{
                   25.4, 18.99}, {25.4, 36.79}, {31.77, 36.79}, {31.77, 
                   35.39}, {28.57, 35.08}, {28.5, 35.01}, {28.5, 32.29}, {
                   28.5, 23.38}, {28.5, 20.8}, {28.57, 20.73}, {31.77, 
                   20.42}, {31.77, 18.99}}, CompressedData["
1:eJxTTMoPSmViYGCQAmIQffirRkx/koMDAxhYOsD4ra8Dd8gdtXOYL+/GAeJf
8fB++lbA3uFmVLzKlkIHh6C3lz/OiLR3eMXpbbOgx8Ghqdhtyrc+e4dfO8xC
epY7OGT5fu4LPmLvcO5+ixPLGQcHbk37ld8e2jsE7ZBrff3RweFhlcg6dyAf
RFZdcYbzf9u3//yk5ALnQ9zj4hDEf/EFXxKCD3MfjA9z/3WffTefAfk//c5U
GW6xcGCPn+EjGuLiEMBoMM8x28JB+JPj+TRLFwf9xRF5maYWDr/XcfzbLufi
wO/aaDfxv7nDnpgj5Um/nB1mnfNjc39ojuY+czT3mzssCQ63O33aweHx8Rm7
pz0wd8iJnnJTAej/iVfXzpv8z9whNOubgzYwfNhS1pfXm1g4SC0uDTEFhp+p
2+sVWVkWDs4yrx+ZAcN3iVlh0f7NFg7o8QEAbSezvA==
                   "], {{41.77, 
                   18.99}, {41.77, 20.42}, {44.91, 20.72}, {45.05, 20.8}, {
                   45.05, 23.52}, {45.05, 32.25}, {45.05, 34.97}, {44.91, 
                   35.04}, {41.77, 35.35}, {41.77, 36.78}, {48.15, 36.78}, {
                   48.15, 18.98}}}]}, {
                AspectRatio -> 1, Axes -> False, Background -> None, Frame -> 
                 None, FrameTicks -> None, ImageSize -> {Automatic, 
                   Dynamic[
                   3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                    Magnification])]}, AspectRatio -> 1, Axes -> False, 
                 Background -> None, Frame -> None, FrameTicks -> None, 
                 ImageSize -> {Automatic, 30}}], CacheGraphics -> False, 
               StripOnInput -> False], 
              GridBox[{{
                 RowBox[{
                   TagBox["\"Name: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    TemplateBox[{"\"CombinatorFixedPointList\"", "\" \"", 
                    
                    TemplateBox[{
                    "\"\[RightGuillemet]\"", 
                    "https://resources.wolframcloud.com/FunctionRepository/\
resources/CombinatorFixedPointList"}, "HyperlinkURL"]}, "RowDefault"], 
                    "SummaryItem"]}], 
                 TagBox["\"\"", "SummaryItem"]}, {
                 RowBox[{
                   TagBox["\"Type: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["\"Function\"", "SummaryItem"]}], 
                 "\[SpanFromLeft]"}, {
                 TagBox[
                  DynamicModuleBox[{ResourceSystemClient`Private`len$$ = 1}, 
                   RowBox[{
                    TagBox["\"Description: \"", "SummaryItemAnnotation"], 
                    "\[InvisibleSpace]", 
                    TagBox[
                    ButtonBox[
                    DynamicBox[
                    ToBoxes[
                    Replace[
                    ResourceSystemClient`Private`snipDots[
                    "Show the evolution of a combinator expression to its \
fixed point based on defined rules and evaluation scheme", 
                    ResourceSystemClient`Private`len$$], Except[
                    Blank[String]] -> 
                    Snippet[
                    "Show the evolution of a combinator expression to its \
fixed point based on defined rules and evaluation scheme", 
                    ResourceSystemClient`Private`len$$], {0}], StandardForm]],
                     ButtonFunction :> (ResourceSystemClient`Private`len$$ = 
                    Ceiling[ResourceSystemClient`Private`len$$ 1.5]), 
                    Appearance -> None, BaseStyle -> {}, Evaluator -> 
                    Automatic, Method -> "Preemptive"], "SummaryItem"]}], 
                   DynamicModuleValues :> {}], "SummaryItem"], 
                 "\[SpanFromLeft]"}, {
                 RowBox[{
                   TagBox["\"Keywords: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    TagBox[
                    
                    TemplateBox[{
                    ",", "\",\"", "\"combinators\"", "\"rewriting systems\""},
                     "RowWithSeparators"], Short], "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox["\"Documentation: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    
                    TemplateBox[{
                    "\"https://resources.wolframcloud.com/FunctionRepository/\
resources/CombinatorFixedPointList\"", 
                    "https://resources.wolframcloud.com/FunctionRepository/\
resources/CombinatorFixedPointList"}, "HyperlinkURL"], "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox["\"UUID: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                   "\"7c7f6fa1-b391-4226-bf1a-1210f5db7b6e\"", 
                    "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox["\"Version: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["\"1.0.3\"", "SummaryItem"]}], ""}}, 
               GridBoxAlignment -> {
                "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> 
               False, GridBoxItemSize -> {
                "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
               GridBoxSpacings -> {
                "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, 
               BaseStyle -> {
                ShowStringCharacters -> False, NumberMarks -> False, 
                 PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, 
            GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, 
            AutoDelete -> False, 
            GridBoxItemSize -> {
             "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
            BaselinePosition -> {1, 1}]}, 
         Dynamic[Typeset`open$$], ImageSize -> Automatic]},
       "SummaryPanel"],
      DynamicModuleValues:>{}], "]"}],
    ResourceObject[
     Association[
     "Name" -> "CombinatorFixedPointList", "ShortName" -> 
      "CombinatorFixedPointList", "UUID" -> 
      "7c7f6fa1-b391-4226-bf1a-1210f5db7b6e", "ResourceType" -> "Function", 
      "Version" -> "1.0.3", "Description" -> 
      "Show the evolution of a combinator expression to its fixed point based \
on defined rules and evaluation scheme", "RepositoryLocation" -> 
      URL["https://www.wolframcloud.com/obj/resourcesystem/api/1.0"], 
      "SymbolName" -> 
      "FunctionRepository`$261bdead1fe84a9c8bc77c5e27583df9`\
CombinatorFixedPointList", "FunctionLocation" -> 
      CloudObject[
       "https://www.wolframcloud.com/obj/cf7bfccd-c5a1-4e4d-9b97-\
62208a67032e"]]],
    Editable->False,
    SelectWithContents->True,
    Selectable->False], ",", 
   InterpretationBox[
    RowBox[{
     TagBox["ResourceObject",
      "SummaryHead"], "[", 
     DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = 
      "Ready"}, 
      TemplateBox[{
        PaneSelectorBox[{False -> GridBox[{{
              PaneBox[
               ButtonBox[
                DynamicBox[
                 FEPrivate`FrontEndResource["FEBitmaps", "SummaryBoxOpener"]],
                 ButtonFunction :> (Typeset`open$$ = True), Appearance -> 
                None, BaseStyle -> {}, Evaluator -> Automatic, Method -> 
                "Preemptive"], Alignment -> {Center, Center}, ImageSize -> 
               Dynamic[{
                 Automatic, 
                  3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                   Magnification])}]], 
              StyleBox[
               GraphicsBox[{
                 Thickness[0.01667], 
                 FaceForm[
                  RGBColor[0.87451, 0.27843, 0.03137]], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}}}, {{{60., 30.}, {60., 13.43146}, {46.56854, 0.}, {30., 
                  0.}, {13.43146, 0.}, {0., 13.43146}, {0., 30.}, {0., 
                  46.56854}, {13.43146, 60.}, {30., 60.}, {46.56854, 60.}, {
                  60., 46.56854}, {60., 30.}}}], 
                 FaceForm[
                  GrayLevel[1]], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 
                   0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 
                   0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{0, 2, 
                   0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 
                   3}}, {{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}}}, {CompressedData["
1:eJxTTMoPSmViYGAwB2IQffirRky/k5aDLdf1xQW2jg4wPpjb5ehgVxmxwtRX
y+G4ptWk048dHaS1jv2cPUHLwW/nod0xNk4QdVzaDoUgAyY4OdyXuqF1UEjH
YfEkK0bfCGcHlS1PY7p+6zp8zHjcsZXDxaH1deAOOVcDh7NngKDHxWHbTkPb
xEhDh6wlSz+VCbg6aHB96bTZaeSwTeDJgpZUVwdjMDBxYACBBleHrwu5X0Xr
mTqwyDhNndXq6vDT8Nk6VRUzB4nzCxbWR7k6PKwSWef+0MzBA8Rgd3Vo+Mgj
9cvd3CFhg/Q23XsuDlorhS+4VJg7LPmz5Nby2S4O8iAHxZk7VIO0Rbk4xHat
PrVP29xho3HruWyge0VLqj2Tj5g5tBUtim094OywQw6owcLMAai6SqTP2eH3
6XcnDwuZOWgFJeYo1gDlIwKbMx+YOnhdMp2cX+TscJaxybJqjanDvBlfkzSK
nR0er9r0vqvC1OFcx6V7D4D8pzuCrSLcTR3W5n2d86XO2WEJMDSvK5s6BIEs
mujs0H8IGCH+Jg4xIMYfZwdwcIcbO7wBBmNrtgvEHXlGcD7IG1VXDOF8sPrp
hhD/WblAwrPYEEJ/dnZQ/24twupl6BBiFfH/uQ6C/6/2WCtzqhNcPTic5jlC
0kmtIcQ9No5w98L44HAH+gdsP7cjxH16UPkaB0g62WDiMGsmEEQ6wM1D54Pp
vWZwPtiexSYQf+wyhKTTJhOI/8RNoOkKwQfH0w8jSHpIVMPgw9SD3flaE24e
LP2ngcAyBB/mHhgf5l5weIuowflg7jpVaPpwgKg/pA4PHwDU5XPA
                   "], {{
                   25.4, 18.99}, {25.4, 36.79}, {31.77, 36.79}, {31.77, 
                   35.39}, {28.57, 35.08}, {28.5, 35.01}, {28.5, 32.29}, {
                   28.5, 23.38}, {28.5, 20.8}, {28.57, 20.73}, {31.77, 
                   20.42}, {31.77, 18.99}}, CompressedData["
1:eJxTTMoPSmViYGCQAmIQffirRkx/koMDAxhYOsD4ra8Dd8gdtXOYL+/GAeJf
8fB++lbA3uFmVLzKlkIHh6C3lz/OiLR3eMXpbbOgx8Ghqdhtyrc+e4dfO8xC
epY7OGT5fu4LPmLvcO5+ixPLGQcHbk37ld8e2jsE7ZBrff3RweFhlcg6dyAf
RFZdcYbzf9u3//yk5ALnQ9zj4hDEf/EFXxKCD3MfjA9z/3WffTefAfk//c5U
GW6xcGCPn+EjGuLiEMBoMM8x28JB+JPj+TRLFwf9xRF5maYWDr/XcfzbLufi
wO/aaDfxv7nDnpgj5Um/nB1mnfNjc39ojuY+czT3mzssCQ63O33aweHx8Rm7
pz0wd8iJnnJTAej/iVfXzpv8z9whNOubgzYwfNhS1pfXm1g4SC0uDTEFhp+p
2+sVWVkWDs4yrx+ZAcN3iVlh0f7NFg7o8QEAbSezvA==
                   "], {{41.77, 
                   18.99}, {41.77, 20.42}, {44.91, 20.72}, {45.05, 20.8}, {
                   45.05, 23.52}, {45.05, 32.25}, {45.05, 34.97}, {44.91, 
                   35.04}, {41.77, 35.35}, {41.77, 36.78}, {48.15, 36.78}, {
                   48.15, 18.98}}}]}, {
                AspectRatio -> 1, Axes -> False, Background -> None, Frame -> 
                 None, FrameTicks -> None, ImageSize -> {Automatic, 
                   Dynamic[
                   3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                    Magnification])]}, AspectRatio -> 1, Axes -> False, 
                 Background -> None, Frame -> None, FrameTicks -> None, 
                 ImageSize -> {Automatic, 30}}], CacheGraphics -> False, 
               StripOnInput -> False], 
              GridBox[{{
                 RowBox[{
                   TagBox["\"Name: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    TemplateBox[{"\"CombinatorMatches\"", "\" \"", 
                    
                    TemplateBox[{
                    "\"\[RightGuillemet]\"", 
                    "https://resources.wolframcloud.com/FunctionRepository/\
resources/CombinatorMatches"}, "HyperlinkURL"]}, "RowDefault"], 
                    "SummaryItem"]}], 
                 TagBox["\"\"", "SummaryItem"]}, {
                 RowBox[{
                   TagBox["\"Type: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["\"Function\"", "SummaryItem"]}], 
                 "\[SpanFromLeft]"}, {
                 TagBox[
                  DynamicModuleBox[{ResourceSystemClient`Private`len$$ = 1}, 
                   RowBox[{
                    TagBox["\"Description: \"", "SummaryItemAnnotation"], 
                    "\[InvisibleSpace]", 
                    TagBox[
                    ButtonBox[
                    DynamicBox[
                    ToBoxes[
                    Replace[
                    ResourceSystemClient`Private`snipDots[
                    "Get an association of match positions to rule matches, \
sorted according to traversal scheme, for a combinator expression", 
                    ResourceSystemClient`Private`len$$], Except[
                    Blank[String]] -> 
                    Snippet[
                    "Get an association of match positions to rule matches, \
sorted according to traversal scheme, for a combinator expression", 
                    ResourceSystemClient`Private`len$$], {0}], StandardForm]],
                     ButtonFunction :> (ResourceSystemClient`Private`len$$ = 
                    Ceiling[ResourceSystemClient`Private`len$$ 1.5]), 
                    Appearance -> None, BaseStyle -> {}, Evaluator -> 
                    Automatic, Method -> "Preemptive"], "SummaryItem"]}], 
                   DynamicModuleValues :> {}], "SummaryItem"], 
                 "\[SpanFromLeft]"}}, 
               GridBoxAlignment -> {
                "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> 
               False, GridBoxItemSize -> {
                "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
               GridBoxSpacings -> {
                "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, 
               BaseStyle -> {
                ShowStringCharacters -> False, NumberMarks -> False, 
                 PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, 
            GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, 
            AutoDelete -> False, 
            GridBoxItemSize -> {
             "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
            BaselinePosition -> {1, 1}], True -> GridBox[{{
              PaneBox[
               ButtonBox[
                DynamicBox[
                 FEPrivate`FrontEndResource["FEBitmaps", "SummaryBoxCloser"]],
                 ButtonFunction :> (Typeset`open$$ = False), Appearance -> 
                None, BaseStyle -> {}, Evaluator -> Automatic, Method -> 
                "Preemptive"], Alignment -> {Center, Center}, ImageSize -> 
               Dynamic[{
                 Automatic, 
                  3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                   Magnification])}]], 
              StyleBox[
               GraphicsBox[{
                 Thickness[0.01667], 
                 FaceForm[
                  RGBColor[0.87451, 0.27843, 0.03137]], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}}}, {{{60., 30.}, {60., 13.43146}, {46.56854, 0.}, {30., 
                  0.}, {13.43146, 0.}, {0., 13.43146}, {0., 30.}, {0., 
                  46.56854}, {13.43146, 60.}, {30., 60.}, {46.56854, 60.}, {
                  60., 46.56854}, {60., 30.}}}], 
                 FaceForm[
                  GrayLevel[1]], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 
                   0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 
                   0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{0, 2, 
                   0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 
                   3}}, {{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}}}, {CompressedData["
1:eJxTTMoPSmViYGAwB2IQffirRky/k5aDLdf1xQW2jg4wPpjb5ehgVxmxwtRX
y+G4ptWk048dHaS1jv2cPUHLwW/nod0xNk4QdVzaDoUgAyY4OdyXuqF1UEjH
YfEkK0bfCGcHlS1PY7p+6zp8zHjcsZXDxaH1deAOOVcDh7NngKDHxWHbTkPb
xEhDh6wlSz+VCbg6aHB96bTZaeSwTeDJgpZUVwdjMDBxYACBBleHrwu5X0Xr
mTqwyDhNndXq6vDT8Nk6VRUzB4nzCxbWR7k6PKwSWef+0MzBA8Rgd3Vo+Mgj
9cvd3CFhg/Q23XsuDlorhS+4VJg7LPmz5Nby2S4O8iAHxZk7VIO0Rbk4xHat
PrVP29xho3HruWyge0VLqj2Tj5g5tBUtim094OywQw6owcLMAai6SqTP2eH3
6XcnDwuZOWgFJeYo1gDlIwKbMx+YOnhdMp2cX+TscJaxybJqjanDvBlfkzSK
nR0er9r0vqvC1OFcx6V7D4D8pzuCrSLcTR3W5n2d86XO2WEJMDSvK5s6BIEs
mujs0H8IGCH+Jg4xIMYfZwdwcIcbO7wBBmNrtgvEHXlGcD7IG1VXDOF8sPrp
hhD/WblAwrPYEEJ/dnZQ/24twupl6BBiFfH/uQ6C/6/2WCtzqhNcPTic5jlC
0kmtIcQ9No5w98L44HAH+gdsP7cjxH16UPkaB0g62WDiMGsmEEQ6wM1D54Pp
vWZwPtiexSYQf+wyhKTTJhOI/8RNoOkKwQfH0w8jSHpIVMPgw9SD3flaE24e
LP2ngcAyBB/mHhgf5l5weIuowflg7jpVaPpwgKg/pA4PHwDU5XPA
                   "], {{
                   25.4, 18.99}, {25.4, 36.79}, {31.77, 36.79}, {31.77, 
                   35.39}, {28.57, 35.08}, {28.5, 35.01}, {28.5, 32.29}, {
                   28.5, 23.38}, {28.5, 20.8}, {28.57, 20.73}, {31.77, 
                   20.42}, {31.77, 18.99}}, CompressedData["
1:eJxTTMoPSmViYGCQAmIQffirRkx/koMDAxhYOsD4ra8Dd8gdtXOYL+/GAeJf
8fB++lbA3uFmVLzKlkIHh6C3lz/OiLR3eMXpbbOgx8Ghqdhtyrc+e4dfO8xC
epY7OGT5fu4LPmLvcO5+ixPLGQcHbk37ld8e2jsE7ZBrff3RweFhlcg6dyAf
RFZdcYbzf9u3//yk5ALnQ9zj4hDEf/EFXxKCD3MfjA9z/3WffTefAfk//c5U
GW6xcGCPn+EjGuLiEMBoMM8x28JB+JPj+TRLFwf9xRF5maYWDr/XcfzbLufi
wO/aaDfxv7nDnpgj5Um/nB1mnfNjc39ojuY+czT3mzssCQ63O33aweHx8Rm7
pz0wd8iJnnJTAej/iVfXzpv8z9whNOubgzYwfNhS1pfXm1g4SC0uDTEFhp+p
2+sVWVkWDs4yrx+ZAcN3iVlh0f7NFg7o8QEAbSezvA==
                   "], {{41.77, 
                   18.99}, {41.77, 20.42}, {44.91, 20.72}, {45.05, 20.8}, {
                   45.05, 23.52}, {45.05, 32.25}, {45.05, 34.97}, {44.91, 
                   35.04}, {41.77, 35.35}, {41.77, 36.78}, {48.15, 36.78}, {
                   48.15, 18.98}}}]}, {
                AspectRatio -> 1, Axes -> False, Background -> None, Frame -> 
                 None, FrameTicks -> None, ImageSize -> {Automatic, 
                   Dynamic[
                   3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                    Magnification])]}, AspectRatio -> 1, Axes -> False, 
                 Background -> None, Frame -> None, FrameTicks -> None, 
                 ImageSize -> {Automatic, 30}}], CacheGraphics -> False, 
               StripOnInput -> False], 
              GridBox[{{
                 RowBox[{
                   TagBox["\"Name: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    TemplateBox[{"\"CombinatorMatches\"", "\" \"", 
                    
                    TemplateBox[{
                    "\"\[RightGuillemet]\"", 
                    "https://resources.wolframcloud.com/FunctionRepository/\
resources/CombinatorMatches"}, "HyperlinkURL"]}, "RowDefault"], 
                    "SummaryItem"]}], 
                 TagBox["\"\"", "SummaryItem"]}, {
                 RowBox[{
                   TagBox["\"Type: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["\"Function\"", "SummaryItem"]}], 
                 "\[SpanFromLeft]"}, {
                 TagBox[
                  DynamicModuleBox[{ResourceSystemClient`Private`len$$ = 1}, 
                   RowBox[{
                    TagBox["\"Description: \"", "SummaryItemAnnotation"], 
                    "\[InvisibleSpace]", 
                    TagBox[
                    ButtonBox[
                    DynamicBox[
                    ToBoxes[
                    Replace[
                    ResourceSystemClient`Private`snipDots[
                    "Get an association of match positions to rule matches, \
sorted according to traversal scheme, for a combinator expression", 
                    ResourceSystemClient`Private`len$$], Except[
                    Blank[String]] -> 
                    Snippet[
                    "Get an association of match positions to rule matches, \
sorted according to traversal scheme, for a combinator expression", 
                    ResourceSystemClient`Private`len$$], {0}], StandardForm]],
                     ButtonFunction :> (ResourceSystemClient`Private`len$$ = 
                    Ceiling[ResourceSystemClient`Private`len$$ 1.5]), 
                    Appearance -> None, BaseStyle -> {}, Evaluator -> 
                    Automatic, Method -> "Preemptive"], "SummaryItem"]}], 
                   DynamicModuleValues :> {}], "SummaryItem"], 
                 "\[SpanFromLeft]"}, {
                 RowBox[{
                   TagBox["\"Keywords: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    TagBox[
                    
                    TemplateBox[{
                    ",", "\",\"", "\"combinators\"", "\"rewriting systems\""},
                     "RowWithSeparators"], Short], "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox["\"Documentation: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    
                    TemplateBox[{
                    "\"https://resources.wolframcloud.com/FunctionRepository/\
resources/CombinatorMatches\"", 
                    "https://resources.wolframcloud.com/FunctionRepository/\
resources/CombinatorMatches"}, "HyperlinkURL"], "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox["\"UUID: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                   "\"975ef05a-d309-448a-8e57-c94cc5aaa45e\"", 
                    "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox["\"Version: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["\"1.0.1\"", "SummaryItem"]}], ""}}, 
               GridBoxAlignment -> {
                "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> 
               False, GridBoxItemSize -> {
                "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
               GridBoxSpacings -> {
                "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, 
               BaseStyle -> {
                ShowStringCharacters -> False, NumberMarks -> False, 
                 PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, 
            GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, 
            AutoDelete -> False, 
            GridBoxItemSize -> {
             "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
            BaselinePosition -> {1, 1}]}, 
         Dynamic[Typeset`open$$], ImageSize -> Automatic]},
       "SummaryPanel"],
      DynamicModuleValues:>{}], "]"}],
    ResourceObject[
     Association[
     "Name" -> "CombinatorMatches", "ShortName" -> "CombinatorMatches", 
      "UUID" -> "975ef05a-d309-448a-8e57-c94cc5aaa45e", "ResourceType" -> 
      "Function", "Version" -> "1.0.1", "Description" -> 
      "Get an association of match positions to rule matches, sorted \
according to traversal scheme, for a combinator expression", 
      "RepositoryLocation" -> 
      URL["https://www.wolframcloud.com/obj/resourcesystem/api/1.0"], 
      "SymbolName" -> 
      "FunctionRepository`$910c5c1fb01a4639832b252de565d58f`\
CombinatorMatches", "FunctionLocation" -> 
      CloudObject[
       "https://www.wolframcloud.com/obj/2a2da271-31df-48f8-bac6-\
ea7e80e98895"]]],
    Editable->False,
    SelectWithContents->True,
    Selectable->False], ",", 
   InterpretationBox[
    RowBox[{
     TagBox["ResourceObject",
      "SummaryHead"], "[", 
     DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = 
      "Ready"}, 
      TemplateBox[{
        PaneSelectorBox[{False -> GridBox[{{
              PaneBox[
               ButtonBox[
                DynamicBox[
                 FEPrivate`FrontEndResource["FEBitmaps", "SummaryBoxOpener"]],
                 ButtonFunction :> (Typeset`open$$ = True), Appearance -> 
                None, BaseStyle -> {}, Evaluator -> Automatic, Method -> 
                "Preemptive"], Alignment -> {Center, Center}, ImageSize -> 
               Dynamic[{
                 Automatic, 
                  3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                   Magnification])}]], 
              StyleBox[
               GraphicsBox[{
                 Thickness[0.01667], 
                 FaceForm[
                  RGBColor[0.87451, 0.27843, 0.03137]], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}}}, {{{60., 30.}, {60., 13.43146}, {46.56854, 0.}, {30., 
                  0.}, {13.43146, 0.}, {0., 13.43146}, {0., 30.}, {0., 
                  46.56854}, {13.43146, 60.}, {30., 60.}, {46.56854, 60.}, {
                  60., 46.56854}, {60., 30.}}}], 
                 FaceForm[
                  GrayLevel[1]], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 
                   0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 
                   0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{0, 2, 
                   0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 
                   3}}, {{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}}}, {CompressedData["
1:eJxTTMoPSmViYGAwB2IQffirRky/k5aDLdf1xQW2jg4wPpjb5ehgVxmxwtRX
y+G4ptWk048dHaS1jv2cPUHLwW/nod0xNk4QdVzaDoUgAyY4OdyXuqF1UEjH
YfEkK0bfCGcHlS1PY7p+6zp8zHjcsZXDxaH1deAOOVcDh7NngKDHxWHbTkPb
xEhDh6wlSz+VCbg6aHB96bTZaeSwTeDJgpZUVwdjMDBxYACBBleHrwu5X0Xr
mTqwyDhNndXq6vDT8Nk6VRUzB4nzCxbWR7k6PKwSWef+0MzBA8Rgd3Vo+Mgj
9cvd3CFhg/Q23XsuDlorhS+4VJg7LPmz5Nby2S4O8iAHxZk7VIO0Rbk4xHat
PrVP29xho3HruWyge0VLqj2Tj5g5tBUtim094OywQw6owcLMAai6SqTP2eH3
6XcnDwuZOWgFJeYo1gDlIwKbMx+YOnhdMp2cX+TscJaxybJqjanDvBlfkzSK
nR0er9r0vqvC1OFcx6V7D4D8pzuCrSLcTR3W5n2d86XO2WEJMDSvK5s6BIEs
mujs0H8IGCH+Jg4xIMYfZwdwcIcbO7wBBmNrtgvEHXlGcD7IG1VXDOF8sPrp
hhD/WblAwrPYEEJ/dnZQ/24twupl6BBiFfH/uQ6C/6/2WCtzqhNcPTic5jlC
0kmtIcQ9No5w98L44HAH+gdsP7cjxH16UPkaB0g62WDiMGsmEEQ6wM1D54Pp
vWZwPtiexSYQf+wyhKTTJhOI/8RNoOkKwQfH0w8jSHpIVMPgw9SD3flaE24e
LP2ngcAyBB/mHhgf5l5weIuowflg7jpVaPpwgKg/pA4PHwDU5XPA
                   "], {{
                   25.4, 18.99}, {25.4, 36.79}, {31.77, 36.79}, {31.77, 
                   35.39}, {28.57, 35.08}, {28.5, 35.01}, {28.5, 32.29}, {
                   28.5, 23.38}, {28.5, 20.8}, {28.57, 20.73}, {31.77, 
                   20.42}, {31.77, 18.99}}, CompressedData["
1:eJxTTMoPSmViYGCQAmIQffirRkx/koMDAxhYOsD4ra8Dd8gdtXOYL+/GAeJf
8fB++lbA3uFmVLzKlkIHh6C3lz/OiLR3eMXpbbOgx8Ghqdhtyrc+e4dfO8xC
epY7OGT5fu4LPmLvcO5+ixPLGQcHbk37ld8e2jsE7ZBrff3RweFhlcg6dyAf
RFZdcYbzf9u3//yk5ALnQ9zj4hDEf/EFXxKCD3MfjA9z/3WffTefAfk//c5U
GW6xcGCPn+EjGuLiEMBoMM8x28JB+JPj+TRLFwf9xRF5maYWDr/XcfzbLufi
wO/aaDfxv7nDnpgj5Um/nB1mnfNjc39ojuY+czT3mzssCQ63O33aweHx8Rm7
pz0wd8iJnnJTAej/iVfXzpv8z9whNOubgzYwfNhS1pfXm1g4SC0uDTEFhp+p
2+sVWVkWDs4yrx+ZAcN3iVlh0f7NFg7o8QEAbSezvA==
                   "], {{41.77, 
                   18.99}, {41.77, 20.42}, {44.91, 20.72}, {45.05, 20.8}, {
                   45.05, 23.52}, {45.05, 32.25}, {45.05, 34.97}, {44.91, 
                   35.04}, {41.77, 35.35}, {41.77, 36.78}, {48.15, 36.78}, {
                   48.15, 18.98}}}]}, {
                AspectRatio -> 1, Axes -> False, Background -> None, Frame -> 
                 None, FrameTicks -> None, ImageSize -> {Automatic, 
                   Dynamic[
                   3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                    Magnification])]}, AspectRatio -> 1, Axes -> False, 
                 Background -> None, Frame -> None, FrameTicks -> None, 
                 ImageSize -> {Automatic, 30}}], CacheGraphics -> False, 
               StripOnInput -> False], 
              GridBox[{{
                 RowBox[{
                   TagBox["\"Name: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    TemplateBox[{"\"CombinatorEvolutionPlot\"", "\" \"", 
                    
                    TemplateBox[{
                    "\"\[RightGuillemet]\"", 
                    "https://resources.wolframcloud.com/FunctionRepository/\
resources/CombinatorEvolutionPlot"}, "HyperlinkURL"]}, "RowDefault"], 
                    "SummaryItem"]}], 
                 TagBox["\"\"", "SummaryItem"]}, {
                 RowBox[{
                   TagBox["\"Type: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["\"Function\"", "SummaryItem"]}], 
                 "\[SpanFromLeft]"}, {
                 RowBox[{
                   TagBox["\"Description: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                   "\"Visualize the evolution of a combinator expression\"", 
                    "SummaryItem"]}], "\[SpanFromLeft]"}}, 
               GridBoxAlignment -> {
                "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> 
               False, GridBoxItemSize -> {
                "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
               GridBoxSpacings -> {
                "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, 
               BaseStyle -> {
                ShowStringCharacters -> False, NumberMarks -> False, 
                 PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, 
            GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, 
            AutoDelete -> False, 
            GridBoxItemSize -> {
             "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
            BaselinePosition -> {1, 1}], True -> GridBox[{{
              PaneBox[
               ButtonBox[
                DynamicBox[
                 FEPrivate`FrontEndResource["FEBitmaps", "SummaryBoxCloser"]],
                 ButtonFunction :> (Typeset`open$$ = False), Appearance -> 
                None, BaseStyle -> {}, Evaluator -> Automatic, Method -> 
                "Preemptive"], Alignment -> {Center, Center}, ImageSize -> 
               Dynamic[{
                 Automatic, 
                  3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                   Magnification])}]], 
              StyleBox[
               GraphicsBox[{
                 Thickness[0.01667], 
                 FaceForm[
                  RGBColor[0.87451, 0.27843, 0.03137]], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}}}, {{{60., 30.}, {60., 13.43146}, {46.56854, 0.}, {30., 
                  0.}, {13.43146, 0.}, {0., 13.43146}, {0., 30.}, {0., 
                  46.56854}, {13.43146, 60.}, {30., 60.}, {46.56854, 60.}, {
                  60., 46.56854}, {60., 30.}}}], 
                 FaceForm[
                  GrayLevel[1]], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 
                   0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 
                   0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{0, 2, 
                   0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 
                   3}}, {{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}}}, {CompressedData["
1:eJxTTMoPSmViYGAwB2IQffirRky/k5aDLdf1xQW2jg4wPpjb5ehgVxmxwtRX
y+G4ptWk048dHaS1jv2cPUHLwW/nod0xNk4QdVzaDoUgAyY4OdyXuqF1UEjH
YfEkK0bfCGcHlS1PY7p+6zp8zHjcsZXDxaH1deAOOVcDh7NngKDHxWHbTkPb
xEhDh6wlSz+VCbg6aHB96bTZaeSwTeDJgpZUVwdjMDBxYACBBleHrwu5X0Xr
mTqwyDhNndXq6vDT8Nk6VRUzB4nzCxbWR7k6PKwSWef+0MzBA8Rgd3Vo+Mgj
9cvd3CFhg/Q23XsuDlorhS+4VJg7LPmz5Nby2S4O8iAHxZk7VIO0Rbk4xHat
PrVP29xho3HruWyge0VLqj2Tj5g5tBUtim094OywQw6owcLMAai6SqTP2eH3
6XcnDwuZOWgFJeYo1gDlIwKbMx+YOnhdMp2cX+TscJaxybJqjanDvBlfkzSK
nR0er9r0vqvC1OFcx6V7D4D8pzuCrSLcTR3W5n2d86XO2WEJMDSvK5s6BIEs
mujs0H8IGCH+Jg4xIMYfZwdwcIcbO7wBBmNrtgvEHXlGcD7IG1VXDOF8sPrp
hhD/WblAwrPYEEJ/dnZQ/24twupl6BBiFfH/uQ6C/6/2WCtzqhNcPTic5jlC
0kmtIcQ9No5w98L44HAH+gdsP7cjxH16UPkaB0g62WDiMGsmEEQ6wM1D54Pp
vWZwPtiexSYQf+wyhKTTJhOI/8RNoOkKwQfH0w8jSHpIVMPgw9SD3flaE24e
LP2ngcAyBB/mHhgf5l5weIuowflg7jpVaPpwgKg/pA4PHwDU5XPA
                   "], {{
                   25.4, 18.99}, {25.4, 36.79}, {31.77, 36.79}, {31.77, 
                   35.39}, {28.57, 35.08}, {28.5, 35.01}, {28.5, 32.29}, {
                   28.5, 23.38}, {28.5, 20.8}, {28.57, 20.73}, {31.77, 
                   20.42}, {31.77, 18.99}}, CompressedData["
1:eJxTTMoPSmViYGCQAmIQffirRkx/koMDAxhYOsD4ra8Dd8gdtXOYL+/GAeJf
8fB++lbA3uFmVLzKlkIHh6C3lz/OiLR3eMXpbbOgx8Ghqdhtyrc+e4dfO8xC
epY7OGT5fu4LPmLvcO5+ixPLGQcHbk37ld8e2jsE7ZBrff3RweFhlcg6dyAf
RFZdcYbzf9u3//yk5ALnQ9zj4hDEf/EFXxKCD3MfjA9z/3WffTefAfk//c5U
GW6xcGCPn+EjGuLiEMBoMM8x28JB+JPj+TRLFwf9xRF5maYWDr/XcfzbLufi
wO/aaDfxv7nDnpgj5Um/nB1mnfNjc39ojuY+czT3mzssCQ63O33aweHx8Rm7
pz0wd8iJnnJTAej/iVfXzpv8z9whNOubgzYwfNhS1pfXm1g4SC0uDTEFhp+p
2+sVWVkWDs4yrx+ZAcN3iVlh0f7NFg7o8QEAbSezvA==
                   "], {{41.77, 
                   18.99}, {41.77, 20.42}, {44.91, 20.72}, {45.05, 20.8}, {
                   45.05, 23.52}, {45.05, 32.25}, {45.05, 34.97}, {44.91, 
                   35.04}, {41.77, 35.35}, {41.77, 36.78}, {48.15, 36.78}, {
                   48.15, 18.98}}}]}, {
                AspectRatio -> 1, Axes -> False, Background -> None, Frame -> 
                 None, FrameTicks -> None, ImageSize -> {Automatic, 
                   Dynamic[
                   3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                    Magnification])]}, AspectRatio -> 1, Axes -> False, 
                 Background -> None, Frame -> None, FrameTicks -> None, 
                 ImageSize -> {Automatic, 30}}], CacheGraphics -> False, 
               StripOnInput -> False], 
              GridBox[{{
                 RowBox[{
                   TagBox["\"Name: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    TemplateBox[{"\"CombinatorEvolutionPlot\"", "\" \"", 
                    
                    TemplateBox[{
                    "\"\[RightGuillemet]\"", 
                    "https://resources.wolframcloud.com/FunctionRepository/\
resources/CombinatorEvolutionPlot"}, "HyperlinkURL"]}, "RowDefault"], 
                    "SummaryItem"]}], 
                 TagBox["\"\"", "SummaryItem"]}, {
                 RowBox[{
                   TagBox["\"Type: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["\"Function\"", "SummaryItem"]}], 
                 "\[SpanFromLeft]"}, {
                 RowBox[{
                   TagBox["\"Description: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                   "\"Visualize the evolution of a combinator expression\"", 
                    "SummaryItem"]}], "\[SpanFromLeft]"}, {
                 RowBox[{
                   TagBox["\"Keywords: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    TagBox[
                    
                    TemplateBox[{
                    ",", "\",\"", "\"combinators\"", "\"rewriting systems\""},
                     "RowWithSeparators"], Short], "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox["\"Documentation: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                    
                    TemplateBox[{
                    "\"https://resources.wolframcloud.com/FunctionRepository/\
resources/CombinatorEvolutionPlot\"", 
                    "https://resources.wolframcloud.com/FunctionRepository/\
resources/CombinatorEvolutionPlot"}, "HyperlinkURL"], "SummaryItem"]}], ""}, {
                
                 RowBox[{
                   TagBox["\"UUID: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox[
                   "\"b196e089-2384-411a-90aa-83f2b3b25519\"", 
                    "SummaryItem"]}], ""}, {
                 RowBox[{
                   TagBox["\"Version: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["\"1.0.3\"", "SummaryItem"]}], ""}}, 
               GridBoxAlignment -> {
                "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> 
               False, GridBoxItemSize -> {
                "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
               GridBoxSpacings -> {
                "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, 
               BaseStyle -> {
                ShowStringCharacters -> False, NumberMarks -> False, 
                 PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, 
            GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, 
            AutoDelete -> False, 
            GridBoxItemSize -> {
             "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
            BaselinePosition -> {1, 1}]}, 
         Dynamic[Typeset`open$$], ImageSize -> Automatic]},
       "SummaryPanel"],
      DynamicModuleValues:>{}], "]"}],
    ResourceObject[
     Association[
     "Name" -> "CombinatorEvolutionPlot", "ShortName" -> 
      "CombinatorEvolutionPlot", "UUID" -> 
      "b196e089-2384-411a-90aa-83f2b3b25519", "ResourceType" -> "Function", 
      "Version" -> "1.0.3", "Description" -> 
      "Visualize the evolution of a combinator expression", 
      "RepositoryLocation" -> 
      URL["https://www.wolframcloud.com/obj/resourcesystem/api/1.0"], 
      "SymbolName" -> 
      "FunctionRepository`$5897fc6186eb4a65be08d757b5d8c1f0`\
CombinatorEvolutionPlot", "FunctionLocation" -> 
      CloudObject[
       "https://www.wolframcloud.com/obj/8514ae94-9339-4875-9cca-\
9d9bc0501328"]]],
    Editable->False,
    SelectWithContents->True,
    Selectable->False]}], "}"}]], "Output",
 CellChangeTimes->{{3.763231608394929*^9, 3.7632316463063316`*^9}, 
   3.828016720366132*^9},
 CellLabel->"Out[20]=",
 CellID->1642993067,ExpressionUUID->"9a3d237a-ce39-4f16-9a24-6027e12b5036"]
}, Open  ]],

Cell["\<\
Compute the sizes of locally stored \"NeuralNet\" resource objects, in MB:\
\>", "ExampleText",
 CellChangeTimes->{{3.7632319097491274`*^9, 3.763231947978718*^9}},
 CellID->188749227,ExpressionUUID->"5503af49-1fd1-4ea3-89f5-6f54545fb6d4"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Map", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"UnitConvert", "[", 
     RowBox[{
      RowBox[{"Quantity", "[", 
       RowBox[{
        RowBox[{"N", "[", 
         RowBox[{"#", "[", "\"\<ByteCount\>\"", "]"}], "]"}], ",", 
        "\"\<Bytes\>\""}], "]"}], ",", "\"\<MB\>\""}], "]"}], "&"}], ",", 
   RowBox[{"Select", "[", 
    RowBox[{"$LocalResourceObjects", ",", 
     RowBox[{
      RowBox[{
       RowBox[{"#", "[", "\"\<ResourceType\>\"", "]"}], "===", 
       "\"\<NeuralNet\>\""}], "&"}]}], "]"}]}], "\[IndentingNewLine]", 
  "]"}]], "Input",
 CellChangeTimes->{{3.763231706121116*^9, 3.763231715903577*^9}, {
  3.7632317702040634`*^9, 3.7632319026116533`*^9}},
 CellLabel->"In[23]:=",
 CellID->184921187,ExpressionUUID->"91ab7fbd-a3c3-445b-b7c2-9e22cc908d8e"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   TemplateBox[{"65.353381`", "\"MB\"", "megabytes", "\"Megabytes\""},
    "Quantity"], ",", 
   TemplateBox[{"1.750489`", "\"MB\"", "megabytes", "\"Megabytes\""},
    "Quantity"]}], "}"}]], "Output",
 CellChangeTimes->{
  3.7632317163831973`*^9, 3.763231785797744*^9, {3.763231842430084*^9, 
   3.763231903082979*^9}, {3.828016735638318*^9, 3.828016739577636*^9}},
 CellLabel->"Out[23]=",
 CellID->488707446,ExpressionUUID->"825d71c9-8879-4029-8e7d-ea610e80b796"]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["More Examples", "ExtendedExamplesSection",
 CellTags->"ExtendedExamples",
 CellID->1854448968,ExpressionUUID->"456fe121-758f-4ad6-9d96-2e57a0bcf8b5"],

Cell[BoxData[
 InterpretationBox[Cell[
  "Scope", "ExampleSection",ExpressionUUID->
   "0fbd8662-e240-41ca-bcd9-7ca71f46b749"],
  $Line = 0; Null]], "ExampleSection",
 CellID->1293636265,ExpressionUUID->"3d9280dd-6661-4a8d-bbde-1d8e7123b08d"],

Cell[BoxData[
 InterpretationBox[Cell[
  "Generalizations & Extensions", "ExampleSection",ExpressionUUID->
   "9ea84794-8b60-479b-be45-8e0f5d33bd38"],
  $Line = 0; Null]], "ExampleSection",
 CellID->1020263627,ExpressionUUID->"1c6d89dc-e871-4fe5-a81e-b2c660875ccb"],

Cell[CellGroupData[{

Cell[BoxData[
 InterpretationBox[Cell[
  "Options", "ExampleSection",ExpressionUUID->
   "4b2873af-4134-4d2b-8f7f-431a8606315f"],
  $Line = 0; Null]], "ExampleSection",
 CellID->2061341341,ExpressionUUID->"04ca60dd-a4a6-49b7-9f2b-b9fa2adf971b"],

Cell[BoxData[
 InterpretationBox[Cell[
  "XXXX", "ExampleSubsection",ExpressionUUID->
   "fb822cb5-ebb0-4a37-a294-dd80ea66e928"],
  $Line = 0; Null]], "ExampleSubsection",
 CellID->1757724783,ExpressionUUID->"f91cb45f-63bb-4f64-86a3-b4bba17fec52"],

Cell[BoxData[
 InterpretationBox[Cell[
  "XXXX", "ExampleSubsection",ExpressionUUID->
   "6c8839f6-b7d7-43e8-87cf-f5ef5eb18a58"],
  $Line = 0; Null]], "ExampleSubsection",
 CellID->1295379749,ExpressionUUID->"24525614-b8ce-4134-becc-672f4a53b772"]
}, Closed]],

Cell[BoxData[
 InterpretationBox[Cell[
  "Applications", "ExampleSection",ExpressionUUID->
   "1f73b08b-4b74-4417-a449-babb541d2fc9"],
  $Line = 0; Null]], "ExampleSection",
 CellID->258228157,ExpressionUUID->"8008c9d4-0511-49ea-9b70-6e997048933c"],

Cell[BoxData[
 InterpretationBox[Cell[
  "Properties & Relations", "ExampleSection",ExpressionUUID->
   "c1901e4c-e3d6-4047-a765-21cc4751e6fa"],
  $Line = 0; Null]], "ExampleSection",
 CellID->2123667759,ExpressionUUID->"168b6ea6-0048-4952-a928-8589747d3f82"],

Cell[BoxData[
 InterpretationBox[Cell[
  "Possible Issues", "ExampleSection",ExpressionUUID->
   "39788d3e-4b45-4f5e-bcb5-6a4faa8b0106"],
  $Line = 0; Null]], "ExampleSection",
 CellID->1305812373,ExpressionUUID->"a34bdd3c-150d-4dff-bab1-1495c611ad50"],

Cell[BoxData[
 InterpretationBox[Cell[
  "Interactive Examples", "ExampleSection",ExpressionUUID->
   "7aab9189-8700-4946-b0b1-b34d44ab3559"],
  $Line = 0; Null]], "ExampleSection",
 CellID->1653164318,ExpressionUUID->"3cb57427-e229-4946-a7f6-52d8568e9329"],

Cell[BoxData[
 InterpretationBox[Cell[
  "Neat Examples", "ExampleSection",ExpressionUUID->
   "99e7c285-de10-4553-b4ba-551b440d0f77"],
  $Line = 0; Null]], "ExampleSection",
 CellID->589267740,ExpressionUUID->"beada140-18bc-41a2-9272-843f037106ea"]
}, Open  ]],

Cell[CellGroupData[{

Cell["Design Discussion", "DesignDiscussionSection",
 CellID->1775809863,ExpressionUUID->"b6da41e9-8313-437d-80d4-645f5ac55afd"],

Cell["XXXX", "DesignDiscussion",
 CellID->308641435,ExpressionUUID->"47bd38d8-ad14-498a-b415-e633874b557b"]
}, Open  ]],

Cell[CellGroupData[{

Cell["Application Notes", "ApplicationNotesSection",
 CellID->1163590540,ExpressionUUID->"1d63aa1c-c7e7-4d4a-ad87-c70abe264c40"],

Cell["XXXX", "ApplicationNotes",
 CellID->1480116198,ExpressionUUID->"63187b85-4f87-4a3e-bd26-2bbd7fd363a6"]
}, Open  ]],

Cell["Test Cases", "TestCasesSection",
 CellID->725748110,ExpressionUUID->"864855e0-b22b-4280-bbbf-40c5e86c317d"],

Cell[CellGroupData[{

Cell["Function Essay", "FunctionEssaySection",
 CellID->37427227,ExpressionUUID->"36a784ce-ae99-4eb9-b37b-89fbe71c4eb2"],

Cell["XXXX", "FunctionEssay",
 CellID->356990964,ExpressionUUID->"a08c1f65-c8d3-4041-b769-0fb7c3b60c2a"]
}, Open  ]]
},
WindowSize->{700, 732},
WindowMargins->{{Automatic, 370}, {60, Automatic}},
TaggingRules->{
 "DocuToolsSettingsInternal" -> {
   "$PacletVersion" -> "0.9.1871", "$MVersion" -> "11", "$FlaggedVersion" -> 
    10.4, "$ApplicationName" -> "Pubs", "$LinkBase" -> "Pubs", 
    "$ApplicationDirectory" -> "C:\\Workspace\\Pubs\\", 
    "$DocumentationDirectory" -> 
    "C:\\Workspace\\Pubs\\Documentation\\English\\", "$UseNewPageDialog" -> 
    ""}, "SecurityRisk" -> False, "SecurityExplanation" -> "", "Author" -> 
  "arnoudb", "CreationDate" -> "04-02-2019 17:05:37"},
CellContext->"Global`",
FrontEndVersion->"12.3 for Mac OS X ARM (64-bit) (April 20, 2021)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb", 
  CharacterEncoding -> "UTF-8"],
ExpressionUUID->"4e82886a-2245-4428-9592-87d378994eca"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
 "ExtendedExamples"->{
  Cell[135722, 2686, 155, 2, 56, "ExtendedExamplesSection",ExpressionUUID->"456fe121-758f-4ad6-9d96-2e57a0bcf8b5",
   CellTags->"ExtendedExamples",
   CellID->1854448968]}
 }
*)
(*CellTagsIndex
CellTagsIndex->{
 {"ExtendedExamples", 140342, 2816}
 }
*)
(*NotebookFileOutline
Notebook[{
Cell[558, 20, 598, 14, 24, "History",ExpressionUUID->"23d88528-ac76-4f58-ab80-8ba08dc66fbf",
 CellID->341476719],
Cell[1159, 36, 139, 1, 20, "AuthorDate",ExpressionUUID->"d4f2b35f-359b-45be-85a8-61932ee8a94b",
 CellID->712066545],
Cell[CellGroupData[{
Cell[1323, 41, 123, 1, 29, "CategorizationSection",ExpressionUUID->"aab346e5-c54e-4543-bfb6-055de9d33d30",
 CellID->1122911449],
Cell[1449, 44, 134, 2, 70, "Categorization",ExpressionUUID->"628529aa-75c0-47b0-aee1-60c78cad327e",
 CellID->686433507],
Cell[1586, 48, 128, 2, 70, "Categorization",ExpressionUUID->"bef83001-b92a-4b47-91bf-718662946187",
 CellID->605800465],
Cell[1717, 52, 124, 2, 70, "Categorization",ExpressionUUID->"bea189f9-73e0-4baf-b29f-7184e0cf366c",
 CellID->468444828],
Cell[1844, 56, 104, 1, 70, "Categorization",ExpressionUUID->"e6d405af-40e0-4ab3-b0f9-eef9bc6a46a8"],
Cell[1951, 59, 135, 2, 70, "Categorization",ExpressionUUID->"4a2472d2-19f5-4b9f-a0f2-c5a1708cd7bb",
 CellID->172747495]
}, Closed]],
Cell[CellGroupData[{
Cell[2123, 66, 111, 1, 19, "SynonymsSection",ExpressionUUID->"fb8acf4f-9285-4b8c-a747-4381fc0b9d41",
 CellID->1427418553],
Cell[2237, 69, 100, 1, 70, "Synonyms",ExpressionUUID->"80d54c53-ee23-43f2-a45f-b1e852e781b1",
 CellID->1251652828]
}, Closed]],
Cell[CellGroupData[{
Cell[2374, 75, 110, 1, 19, "KeywordsSection",ExpressionUUID->"e9878159-9f99-4959-9826-e5a3f952bf23",
 CellID->477174294],
Cell[2487, 78, 100, 1, 70, "Keywords",ExpressionUUID->"612ce670-b22f-493d-b218-797337b1a463",
 CellID->1164421360]
}, Closed]],
Cell[CellGroupData[{
Cell[2624, 84, 120, 1, 19, "TemplatesSection",ExpressionUUID->"5cc15371-6f63-4f57-9207-32b25cb98ecc",
 CellID->1872225408],
Cell[2747, 87, 149, 2, 70, "Template",ExpressionUUID->"895d1c65-38f1-4125-baff-a225fcfc19c8",
 CellID->1562036412],
Cell[2899, 91, 137, 2, 70, "Template",ExpressionUUID->"170b786f-fb75-4556-a26a-6701da067cc2",
 CellID->158391909],
Cell[3039, 95, 136, 2, 70, "Template",ExpressionUUID->"82a33b27-a8e0-4f8a-ba2a-5f2dee7b1bbf",
 CellID->1360575930],
Cell[3178, 99, 137, 2, 70, "Template",ExpressionUUID->"a0124f6d-7659-412c-a856-eefb69ed49a8",
 CellID->793782254]
}, Closed]],
Cell[CellGroupData[{
Cell[3352, 106, 108, 1, 19, "DetailsSection",ExpressionUUID->"8f9f96de-cdd4-415b-98c3-6a4a1d7a219e",
 CellID->307771771],
Cell[3463, 109, 117, 2, 70, "Details",ExpressionUUID->"4b2f2a6b-f93c-4868-9e10-5b6968909260",
 CellID->49458704],
Cell[3583, 113, 124, 2, 70, "Details",ExpressionUUID->"6e4a3ae1-cdf6-47cc-ad1f-759e8fe45593",
 CellID->350963985],
Cell[3710, 117, 121, 2, 70, "Details",ExpressionUUID->"efc33df5-b775-495a-80e4-3521a78bc446",
 CellID->422270209],
Cell[3834, 121, 126, 2, 70, "Details",ExpressionUUID->"1a0db4eb-149a-46f3-b25b-b280d6264af5",
 CellID->545239557],
Cell[3963, 125, 116, 2, 70, "Details",ExpressionUUID->"1050f771-3937-45cd-bf2a-bca989fc6c2c",
 CellID->121292707],
Cell[4082, 129, 115, 2, 70, "Details",ExpressionUUID->"2d37259b-d19a-4265-94d9-1062a057d814",
 CellID->29314406],
Cell[4200, 133, 117, 2, 70, "Details",ExpressionUUID->"4e0c64af-4701-4221-b6a7-d115b2825a25",
 CellID->96001539],
Cell[4320, 137, 133, 2, 70, "Details",ExpressionUUID->"d0039a91-8ee2-4052-8ab0-325c85db884a",
 CellID->123278822],
Cell[4456, 141, 122, 2, 70, "Details",ExpressionUUID->"02ff136a-5412-4c7d-9f54-fb44ec7c41f5",
 CellID->240026365]
}, Closed]],
Cell[CellGroupData[{
Cell[4615, 148, 117, 1, 19, "SecuritySection",ExpressionUUID->"c4d92900-bc11-4614-8c83-407abdd45933",
 CellID->13551076],
Cell[4735, 151, 1094, 30, 70, "SecurityDetails",ExpressionUUID->"89fc8445-1353-4fa3-97dd-1be0f00a5de5",
 CellID->2488900]
}, Closed]],
Cell[CellGroupData[{
Cell[5866, 186, 189, 2, 63, "ObjectName",ExpressionUUID->"9e65fd4a-3b79-48c0-af70-75bef669e834",
 CellID->1224892054],
Cell[6058, 190, 460, 9, 76, "Usage",ExpressionUUID->"2f7b7357-db0a-477c-a3fa-e2cca7faa2b5",
 CellID->982511436],
Cell[6521, 201, 97, 1, 25, "Notes",ExpressionUUID->"c396774d-bb61-4976-8af9-595edbd6f735",
 CellID->1067943069]
}, Open  ]],
Cell[CellGroupData[{
Cell[6655, 207, 112, 1, 44, "TutorialsSection",ExpressionUUID->"b02d4013-fc03-46fd-91f5-418756d88d93",
 CellID->250839057],
Cell[6770, 210, 100, 1, 16, "Tutorials",ExpressionUUID->"e5fbfac5-d780-4a61-9aa1-c2995b34e594",
 CellID->341631938]
}, Open  ]],
Cell[CellGroupData[{
Cell[6907, 216, 138, 1, 31, "RelatedDemonstrationsSection",ExpressionUUID->"2bafa20c-ad4d-4358-9b58-1c0fa094f645",
 CellID->1268215905],
Cell[7048, 219, 113, 1, 16, "RelatedDemonstrations",ExpressionUUID->"ca787c01-e02b-4f0c-b52a-b5a25070bba2",
 CellID->1129518860]
}, Open  ]],
Cell[CellGroupData[{
Cell[7198, 225, 120, 1, 31, "RelatedLinksSection",ExpressionUUID->"a98c198c-eaff-4f47-a52b-bde15cb67cfa",
 CellID->1584193535],
Cell[7321, 228, 104, 1, 16, "RelatedLinks",ExpressionUUID->"ec84bd42-24ea-4c7d-a2df-bf8e73ab079b",
 CellID->1038487239]
}, Open  ]],
Cell[CellGroupData[{
Cell[7462, 234, 110, 1, 31, "SeeAlsoSection",ExpressionUUID->"d9364631-c239-4d65-b012-ba498b2ced33",
 CellID->1255426704],
Cell[7575, 237, 98, 1, 16, "SeeAlso",ExpressionUUID->"77ab00c7-f97f-445a-9882-c5a9482ccd27",
 CellID->929782353]
}, Open  ]],
Cell[CellGroupData[{
Cell[7710, 243, 127, 1, 31, "RelatedWorkflowsSection",ExpressionUUID->"fc08db45-053b-4d9f-98c1-1ff4c0f2aaf6",
 CellID->121236710],
Cell[7840, 246, 107, 1, 16, "RelatedWorkflows",ExpressionUUID->"0387d739-2698-4d59-91f8-023405a5f852",
 CellID->294347949]
}, Open  ]],
Cell[CellGroupData[{
Cell[7984, 252, 112, 1, 31, "MoreAboutSection",ExpressionUUID->"b2f57e8f-69ad-4769-b4dc-58a90c351f38",
 CellID->38303248],
Cell[8099, 255, 110, 1, 16, "MoreAbout",ExpressionUUID->"0862ec19-c5ba-4499-bc8f-b5b8b510794c",
 CellID->1665078683]
}, Open  ]],
Cell[CellGroupData[{
Cell[8246, 261, 411, 11, 70, "PrimaryExamplesSection",ExpressionUUID->"ff765981-7828-4382-a532-4eb8c1f0790e",
 CellID->880084151],
Cell[8660, 274, 208, 2, 22, "ExampleText",ExpressionUUID->"9f18615e-568f-4491-8475-69e25b16dee5",
 CellID->27136305],
Cell[CellGroupData[{
Cell[8893, 280, 211, 3, 27, "Input",ExpressionUUID->"48d120a9-8c4a-481d-b3f1-a5417e7d8153",
 CellID->774120792],
Cell[9107, 285, 124976, 2350, 404, "Output",ExpressionUUID->"9a3d237a-ce39-4f16-9a24-6027e12b5036",
 CellID->1642993067]
}, Open  ]],
Cell[134098, 2638, 248, 4, 22, "ExampleText",ExpressionUUID->"5503af49-1fd1-4ea3-89f5-6f54545fb6d4",
 CellID->188749227],
Cell[CellGroupData[{
Cell[134371, 2646, 795, 21, 66, "Input",ExpressionUUID->"91ab7fbd-a3c3-445b-b7c2-9e22cc908d8e",
 CellID->184921187],
Cell[135169, 2669, 504, 11, 29, "Output",ExpressionUUID->"825d71c9-8879-4029-8e7d-ea610e80b796",
 CellID->488707446]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[135722, 2686, 155, 2, 56, "ExtendedExamplesSection",ExpressionUUID->"456fe121-758f-4ad6-9d96-2e57a0bcf8b5",
 CellTags->"ExtendedExamples",
 CellID->1854448968],
Cell[135880, 2690, 242, 5, 33, "ExampleSection",ExpressionUUID->"3d9280dd-6661-4a8d-bbde-1d8e7123b08d",
 CellID->1293636265],
Cell[136125, 2697, 265, 5, 21, "ExampleSection",ExpressionUUID->"1c6d89dc-e871-4fe5-a81e-b2c660875ccb",
 CellID->1020263627],
Cell[CellGroupData[{
Cell[136415, 2706, 244, 5, 21, "ExampleSection",ExpressionUUID->"04ca60dd-a4a6-49b7-9f2b-b9fa2adf971b",
 CellID->2061341341],
Cell[136662, 2713, 247, 5, 70, "ExampleSubsection",ExpressionUUID->"f91cb45f-63bb-4f64-86a3-b4bba17fec52",
 CellID->1757724783],
Cell[136912, 2720, 247, 5, 70, "ExampleSubsection",ExpressionUUID->"24525614-b8ce-4134-becc-672f4a53b772",
 CellID->1295379749]
}, Closed]],
Cell[137174, 2728, 248, 5, 21, "ExampleSection",ExpressionUUID->"8008c9d4-0511-49ea-9b70-6e997048933c",
 CellID->258228157],
Cell[137425, 2735, 259, 5, 21, "ExampleSection",ExpressionUUID->"168b6ea6-0048-4952-a928-8589747d3f82",
 CellID->2123667759],
Cell[137687, 2742, 252, 5, 19, "ExampleSection",ExpressionUUID->"a34bdd3c-150d-4dff-bab1-1495c611ad50",
 CellID->1305812373],
Cell[137942, 2749, 257, 5, 19, "ExampleSection",ExpressionUUID->"3cb57427-e229-4946-a7f6-52d8568e9329",
 CellID->1653164318],
Cell[138202, 2756, 249, 5, 19, "ExampleSection",ExpressionUUID->"beada140-18bc-41a2-9272-843f037106ea",
 CellID->589267740]
}, Open  ]],
Cell[CellGroupData[{
Cell[138488, 2766, 128, 1, 79, "DesignDiscussionSection",ExpressionUUID->"b6da41e9-8313-437d-80d4-645f5ac55afd",
 CellID->1775809863],
Cell[138619, 2769, 107, 1, 16, "DesignDiscussion",ExpressionUUID->"47bd38d8-ad14-498a-b415-e633874b557b",
 CellID->308641435]
}, Open  ]],
Cell[CellGroupData[{
Cell[138763, 2775, 128, 1, 31, "ApplicationNotesSection",ExpressionUUID->"1d63aa1c-c7e7-4d4a-ad87-c70abe264c40",
 CellID->1163590540],
Cell[138894, 2778, 108, 1, 16, "ApplicationNotes",ExpressionUUID->"63187b85-4f87-4a3e-bd26-2bbd7fd363a6",
 CellID->1480116198]
}, Open  ]],
Cell[139017, 2782, 113, 1, 31, "TestCasesSection",ExpressionUUID->"864855e0-b22b-4280-bbbf-40c5e86c317d",
 CellID->725748110],
Cell[CellGroupData[{
Cell[139155, 2787, 120, 1, 31, "FunctionEssaySection",ExpressionUUID->"36a784ce-ae99-4eb9-b37b-89fbe71c4eb2",
 CellID->37427227],
Cell[139278, 2790, 104, 1, 20, "FunctionEssay",ExpressionUUID->"a08c1f65-c8d3-4041-b769-0fb7c3b60c2a",
 CellID->356990964]
}, Open  ]]
}
]
*)

